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ON THREE Presents . . . 




Micro-Sci Disk Drives 



MICRO-SCI 



Every once in a while a product appears that is so good ON THREE decides to offer it for sale to our 
readers. The Micro-Sci line of disk drives (and the Gameport ///) are the first of these superior type 
products. Byte for byte, these drives offer greater speed and more value than any comparable drive on 
the market today. If you are looking into purchasing an external disk drive for your ///, ON THREE 
encourages you to look into this fantastic product line. 

Expanding disk storage on the Apple /// can be an expensive proposition. 

But Micro-Sci has a better proposition for you, because our disk drives for the Apple /// give you 
greater capacity and performance for every dollar spent. 

And there are no compatibility problems. The A3 is a direct replacement for Disk /// drives, and the 
70-track A73 and 140-track A143 are supplied with a driver that is easily added to the SOS driver 
module, affording extra storage and fast seek rates for all of the programs that run under SOS. 

Talk about compatible! All three are the same size as your built-in drive and they use the same 
diskettes! 

Are all of your slots full? Don't worry, these drives plug right into the back of your /// and they don't 
need a power cord! Up to three extra disk drives can be daisy-chained and they can be mixed in any 
combination of Disk ///, A3, A73 or A143. 

The A3 offers identical capacity to the Disk /// and is an excellent choice for a second disk 
compatibility in the Apple ][ emulation mode. 

At 286 KBytes, the A73 has double the capacity of the Disk /// while the Al 43 packs 572 KBytes of 
data onto a diskette. With over half a megabyte of storage space, the A143 makes a truly viable 
backup device for the Profile Hard Disk. 

With that large a capacity, many people find that they don't need a hard disk! Since up to three 
A143's can be used with your ///, you can have over one and three quarter megabytes of data on-line 
at all times! 

ON THREE is pleased to announce the following low, low prices on these great disk drives. 



Suggested List Price: 


A3 

$379 


A73 

$529 


A143 

$659 


ON THREE Price: 


$299 


$409 


$509 


Savings 


$80 


$120 


$150 



To order, use the attached envelope and add $6.50 for postage and handling for each drive ordered. 
Please allow four weeks for delivery. 

Gameport /// 

You don't have to be chained to your job, and neither does your Apple ///. After the working day is 
done, release your computer into the exhilarating world of adventure and challenge with a Gameport 
/// from Micro-Sci. The new Gameport /// game controller adapter lets you use game paddles, 
joysticks and all your favorite Apple ][ amusement packages with your Apple /// computer. The 
Gameport /// is easy to use and simple to install - your only challenge is to conquer the invaders! 

The Gameport /// 

• Allows all games written for the Apple ][ to be used on the Apple ///. 

• Works with all Apple ][ game paddles and joysticks. 

• Allows programs which require a game I/O protection key to run in Apple ][ emulation mode. 

• Can be installed in any slot. 

• Does not interfere with the normal operation of the Apple ///. 

• Package includes: Gameport /// board, Apple ][ Emulation Modification Diskette and complete, 
easy-to-follow instructions (Apple ][ game controllers not included). 

ON THREE proudly sells the Gameport /// by Micro-Sci. For only $59.95 you can now get the best 
that the Apple /// and the Apple ][ has to offer. That's $15 off the suggested list price so don't be left 
out, place your order today! Please use the attached envelope for ordering and remember to add $2.50 
for postage and handling. 
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The €ditor's Block: 



Bob Consorti 



I ell, we're back again! Thanks for all of your support, I don't 
KaJ know how we would do it without your hel p. Yet, even with 
the tremendous support Apple /// users have given us, putting 
together a quality publication is both hard work and time- 
consuming. For those of you wondering, we will go to a monthly 
format as soon as possible. 

The biggest problem we have encountered to date is in getting 
enough articles to fill up an issue. Since I'm sure we all want to see 
an issue a month very soon, I am requesting that if you can submit 
an article, please do. We need your help! 

Now that my blood pressure has gone down a bit, let me 
introduce you to ON THREE'S latest products. Joining the ever 
popular ON THREE O'clock and the DOM #1 are SIX new 
products! 

Are you looking into buying another disk drive? Have we got a 
deal for you! ON THREE is proud to announce that we are now 
selling the Micro-Sci line of disk drives for the Apple ///.Very easy 
to install and use, these drives don't use up a slot and are com- 
pletely compatible with all Apple /// programs. The A1 43 packs 
572K Bytes of data onto a diskette. That's over half a megabyte! 

If you have a ProFileand are tired of wasting two hours and 40 
floppy disks to back it up, Micro-Sci disk drives dre just what 
you've been waiting for. And if you don't have a hard disk but feel 
limited by the standard old 140K disk drives, try out the A143 - 
you'll love it! 

Sounds pretty good, right? Well the bottom line is the price. 
Only $509 for over half a megabyte of fast data storage. If you dre 
just looking for a second 140K floppy disk drive, the A3 is a direct 
replacement for the Disk /// and is priced at only $299. Last but 
not least, the A73 provides double the storage of the standard 
Apple drive and costs just $409. 

A more complete description of these three disk drives is found 
on the inside front cover. Check them out, you'll be glad you did! 

Three down, three to go! The next new product is the Game- 
port/// by Micro-Sci. It lets you use game paddles, joysticks and 
ALL your favorite Apple ][ amusement software with your Apple 
///. Easy to install and use, ON THREE offers the Gameport/// for 
only $59.95. See the inside front cover for more details. 

The next to last item is the second Disk Of the Month! Following 
our commitment to bringing you the best products at the lowest 
possible price, it contains all the useful programs in this month's 
issue, and is priced at only $9.95. You can now list Apple ][ files 
from your /// as well as changing the characters of your Apple 
DMP or Prowriter. What a buy! 

Last and certainly not least is the most important Apple /// 
utility that will ever come out. I'm talking about none other than 
Lazarus ///, the package that will recover the files you acciden- 
tally deleted. 

Following Murphy's Law, the one file you accidentally delete 
wi 1 1 be the only one you haven't ever backed up. With Lazarus /// 
you will never again have to retype months and months of impor- 
tant data. Just insert the diskette with the deleted files and Lazarus 
/// will recover it. 

Completely user friendly, this program has on-line help and 
tutorial screens to give help to you novices out there. It even works 




with the ProFile and other 

disk drives! If you place 

your order today, you can 

get it for the pre-introductory 

price of $24.95. Similar programs for the Apple ][ have been sold 

for over $100, so I think you'll agree with me when I say it's a steal! 

See the inside back cover for ordering details. 

Switching now to a more complicated subject, many people 
have written to me saying that Apple has not been very supportive 
of the /// in the past. Most everyone also seems to think that Apple 
is going to drop the /// completely. While even Apple will admit 
it's having problems with the ///, they dre not going to 'drop-it'. 

I won't try and make excuses for Apple, that's not myjob. Let me 
just say that they ^z aware that there is a serious problem and they 
are attempting to correct it. People ask me how and when, but I 
can't answer that one. I n my present position I have access to some 
information about future Apple /// offerings. However, I am 
bound by non-disclosure agreements so I can't say exactly what. 
But they are definitely commited to the Apple ///'s future, so 
don't worry. 

Now it's time to turn your back on all the problems of the world 
and look inside the latest issue of ON THREE. One of the things that 
ON THREE does is answer your questions. Look over the Letters to 
the Editor this month. There is a heck of a lot of information on 
those pages that yOU can use. Talk about information, look over our 
review section this month. Now that's a lot! 

This month Timothy Smith shows how to change the characters 
that your Apple DMP or Prowriter prints with. A very nice utility 
program is included that lets your DMP print with any of the screen 
fonts. Now your printer can use the fancy Gothic characters, or the 
modern Byte character set. Any Apple /// screen font can be 
used! 

For those of you who want it, with the information and programs 
in the article DOS File List, you can list the files on any Apple ][ DOS 
diskette. Just another handy utility from the folks at ON THREE. Also 
included are some handy invokable routines by Martin Nichols. 

Al Evans is back with '/// to the l\Adx'. In this article he shows just 
what makes the horses run! The long awaited WPL tutorial com- 
mences this month. Here you will learn just what WPL can do for 
you! In the next issue, Earl Curlson and Louis Hanson will resume 
their popular tutorials. 

Next time I'll show you a program to do a complete verification 
of your disks and more. Martin Nichols will bring you a routine to 
format disks in Basic, and maybe even a special on Pascal! Reviews, 
reviews and more reviews. And would you beleive it?, two hard- 
ware modifications for your///. One to allow color in the emula- 
tion mode and another to fix the game paddle problem. We will 
even squeeze in an article on spreadsheeting - from Basic! 

Before I leave you, let me put out a call to all Apple /// users 
who think they know their machine: ON THREE is presently setting 
up a HOT-LINE service to help Apple /// users overcome their 
problems. If you know enough to answer questions, please write 
or give us a call. In a very short time I hope to have enough of our 
readers willing to spend a little time answering questions that any 
Apple /// owner could dial a relatively local number and get 
immediate help. 



The €ditor's Block continued on poge 9. 
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Ask THR€€: 



(letters to the €ditor) 



Dear Bob, 

What a GREAT publication — ON THREE. Initially thought you 
were spoofing about not having enough time to type in the 
programs . . . thus buy the disks. But you're right! These dre MUST 
haves for the wealth of information contained thereon. The mini- 
tutorials are sorely needed and dre the best yet to come out 
specifically for the ///. 

We have a situation which could be addressed to you or Louis 
Hanson for a clue to overcome. During the past two years we've 
worked up some 37 integrated programs producing a neat pack- 
age "Municipal Tax Management Systems" for the local tax collec- 
tor which produce the tax bills, keep track of ownership changes, 
maintain the assessor's records, post payments, late charges, inter- 
est penalties, etc. We've marketed two sets so far, and dre receiving 
inquires from owners of other brands of computers. As a result, 
we're in the process of converting the programs from the originally 
written Basic to Pascal. The data base on which these were written 
is a 2500 account BasicData file. We're wondering if you know of a 
utility to convert Basdata files to Pasdata files so that we do not 
have to manually type the files all in again. Let me tell you, THAT is 
some chore! 

Interesting clock you have . . . considerably different than our 
Thunderclock. With the Thunderclock we've learned to date-stamp 
a program with a little text file routine, though it takes several 
seconds to apply. Haven't tried to access it in Pascal yet so can't 
tell whether it can be done. Any thoughts on this will certainly save 
us considerable experimental time. 

Your fledgling "ON THREE" is moving right to the heart of getting 
the best out of the ///. It deserves ALL Three'ers strong and 
continuing support. You certainly have ours. 

Very Truly Yours, 

Coville Woodburn 
New Hampshire 

Dear Mr. Woodburn, 

I'm very glad that you are enjoying the magazine, we are 
doing our best to fill it with a wealth of information. I'm also 
pleased to see that you like the tutorials. We are planning quite 
a few more in the near future. 

On the subject of the Basic data files, read pages 213 
through 216 in the Pascal Programmer's Manual, Volume 1. 
Here the description of the way Pascal handles different types 
of files should help you find a solution to the conversion 
problem. 

You see, to convert a Basic text or data file to a Pascal format, 
you must have planned out a file data and record structure for 
the conversion. You can read in a record from the Basic data 
file into the correct record format and then write it out in your 
defined data structure format. 

The ON THREE O'clock interfaces with SOS directly, no 
special drivers are needed and no complicated date-stamp 





routines are neccessary. Whenever you first save a file and 
whenever you modify it, these times and dates are automati- 
cally put into the file's directory entry. 

Your Basic programs can also use the reserved words 'DATES' 
and 'TIMES' to provide you with an up to the second read-out 
on what time it is. From Pascal you can access the internal date 
and time by using the Applestuff Unit as described on pages 
50-52 in the Pascal Programmer's Manual, Volume 2. 

Thank you again for your support. 

Dear ON THREE, 

At last, a masazine and a sroup of people dedicated to 
in-depth support of the fantastic Apple ///! Enclosed is my check 
for a one-year subscription. Please be sure to notify me when the 
reprint ofthe January issue is available— I definitely wanttoobtain 
a copy. 

All this enthusiasm, and I don't even have my Apple /// yet! I 
expect to set it soon, though— perhaps this week. My enthusiasm 
for ON THREE is because up to now I've been frustrated with how 
slowly support for the /// has been developing. But the /// is 
such a beautiful machine that I decided to "rough-it" and buy it 
instead of an Apple //e. Now I find your organization is available 
to help me over the rough spots. I have already passed knowledge 
of your existence on to others and I will work hard at this in the 
future because I agree the more support we can get, the more it 
will benefit us all. (Maybe I can talk the local stores into a list of their 
Apple /// buyers so I can contact them myself.) I also hope to 
make contributions to your magazine in the future. 

Incidentally, I am pleased to see so much emphasis on Pascal in 
ON THREE, since that is my preferred language and one of the 
reasons I'm buying an Apple ///. 

So sign me up, and let me know when the January reprint is 
ready. 

Sincerely, 

Hobart S. Cable, II 
Ohio 

Dear Mr. Cable, 

Your enthusiasm is great! ON THREE is here to do just what 
you say - help the Apple /// user over the rough spots. I'm very 
glad we can help, so if you have any questions, please do write 
again. 

Gentlemen, 

Finally there appears information on the Apple ///! Please rush 
subscription information plus details on how I may order all back 
issues. 

Bless you for coming to the aid of us Apple /// users left 
completely out in the cold by Apple Computer, Inc. 
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Now maybe I can cancel some of those other Apple oriented 
magazines that give only 3 or 4 pages of Apple /// info. 

Thanks, 



Charles Miller 
Pennsylvania 



Dear Mr. Miller, 



I'm glad that we can help you. One of the big reasons I 
started ON THREE was because I was sick of paying a few 
dollars for a magazine with only a page or two of Apple /// 
information. 

To put it quite bluntly, I'm glad you're cancelling those other 
subscriptions. It's really their own fault for not addressing the 
needs of the Apple /// community. 

Gentlemen, 

On 12 April 1983, 1 purchased a 256K Apple/// system along 
with an Apple dot matrix printer and other assorted accessories. 
One of the things which convinced me to buy was your premiere 
issue of ON THREE which happened to be in the showroom. After 
seeing just that one issue, I felt it was just the type of publication 
which would help me get the most out of my system and also to 
get my family involved. Sign me up! 

A problem of interest to new buyers: Since I elected to buy the 
Apple dot matrix printer, I needed a grappler interface to link to 
the printer. At first, my salesman said I just had to read the manuals 
to figure it out. As you are probably aware, this was not the case. 
After spending most of the weekend scouring through manuals, I 
was told the fol lowing Monday that my salesman had it on diskette 
for me. Well, he came out and installed it for me and everything 
seemed to be going smoothly. That evening, every boot diskette 
with the grappler.driver on it locked the system up. We spent two 
weeks swapping out systems, trying various versions of SOS, 
placing calls to Charlotte, NC, moving the system from one side of 
the house to the other, etc. Nothing seemed to work. 

By accident last weekend, I happened to turn my printer on 
the system was locked up, and voila!, it booted. After three weeks 
the salesman making housecalls and me talking to all kinds of micro 
we finally figured out. The Apple dot matrix printer has to be on 
in the select mode in order for the system to boot without interven- 
tion. I n other words, once you walk i nto your computer room, turn 
the printer on and place it in the select mode BEFORE you try 
booting your Apple/// up. Hopefully, this information will save a 
of heartache and ill feelings after your initial purchase. 

Enclosed will find my check for a subscription to ON THREE. 
Best wishes on new publication. 

Sincerely, 

Del Brashares 
Alabama 

Dear Mr. Brashares, 

That's the kind of letter I like to hear! I know ON THREE has 
been having some impact on the sales of the Apple ///, but 
only letters like yours can assure us that this is really happening. 

The note about the Apple Dot Matrix Printer and the 



Grappler device driver is something that I'm sure many of our 
readers liked to hear. I'm always amazed by the problems that 
can happen when interfacing two different pieces of 
equipment. 
Thanks again for your letter. 

Good Morning! 

Enclosed please find my check covering the next twelve issues 
of your publication. 

After reading issue #2, I suddenly felt that I was no longer 
stranded on a lonely island. 

I have owned my/// since last July, and have not been success- 
ful in receiving any communication from Apple or for that matter 
the dealer who sold me the machine. A search of computer stores 
and bookstores for material related to my Apple are futile. I was 
resigned to thinking that we who have the /// sre alon^ and the 
problems we had were ours to deal with alone. 

Thank you for a fine magazine which appears to have the 
necessary knowledge to solve the problems we have been 
encountering. 

Very Truly Yours, 

Michael Gordon 
Florida 

Dear Mr. Gordon, 

With the introduction of ON THREE, Apple /// users will not 
have to feel alone any more. We're here to help you so if you 
have any problems in the future please write again. 

Dear hAr. Consorti, 

You have at least one more supporter in your efforts to get the 
/// its due place in the microcomputer world. I also get Call- 
A.P.P.LE. and Softalk, two fine publications, but their primary focus 
is on the ][ in its many forms and I long for some more attention to 
my machine. 

Do you have an effort to build a group library, perhaps one that 
could be accessed by phone 7 I can report that "Patching Apple 
/// Pascal" (J. Jeppson, Softalk, Feb. 1983, p. 190) worked imme- 
diately to make my ProFile the Pascal System volume. 

In your review of Apple Writer /// you warn that it cannot use 
more than 1 28K. This is an important bit of information that I would 
suggest you include in your "Products Received" feature. 

I am enclosing a SASE for your Author Guidelines as well as my 
check for my subscription. 

Sincerely, 

Harry T Hanson 
New Jersey 

Dear Mr. Hanson, 

We are planning a bulletin-board type service in the near 
future for those of you with modems. Your ideas on this subject 
will be most welcome. 

Dr. Jeppson's Pascal Patch does work very nicely. Just like 
Quark's Catalyst, it allows you to put all your Pascal files on the 
ProFile. 
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Dear Sir, 

Congratulations. You have achieved that rdre blend of speaking 
to many varied interests while making the total publication of 
interest to everyone. I don't think I ever read a magazine from cover 
to cover until your issue of ON THREE arrived. 

I am enclosing a check for a subscription, clock and disk of the 
month. I don't want to miss anything. 

Again, thanks for filling a void for those of us with Apple ///'s 
that have just been waiting foryou to come along. I look forward to 
future issues. I will also start promoting other subscriptions. We 
can't let this grand start you have made wither and die for lack of 
support. 

Sincerely, 

Patrick E. Thomas 
Iowa 

Dear Mr. Thomas, 

Thank you for the letter, we are doing are best to interest 
everyone. Since word of mouth is the best type of advertising, I 
very much appreciate your telling other Apple /// owners 
about ON THREE. 

Dear l\Ar. Consorti, 

Enclosed is my $30 check for a subscription to your magazine. 

I have been using the PFS series of programs for quite a while 
and I feel rather qualified, therefore, to be critical of the grade 
pointyou gave PFS: Report. In my mind I feel that a B- is too low. In 
fact, an A would be appropriate. I purchased both an Apple /// 
and a TRS-80 II to test them side by side for an application in my 
avacodo grove. The Apple /// won hands down principally 
because of PFS: Report. The TRS-80 is now sold. 

Kindly send me a copy of your "Author Guidelines." I'd like to 
squeeze some time and write an article on how to make those 
programs really work. 

Let me join your well wishers in congratulating you on a fine 
publication. There is no question you are filling a need so I hope 
your subscription file becomes overloaded quickly. 

Perhaps you dre open to suggestion. Why not have a department 
for novice owners 7 I'll bet general interest articles and instruction 
on programming fundamentals, at a level that the novice can 
might just be the kind of bait you need to get them hooked. Say it is 
intermediates but pitch it to the novices. The experts can skip it if 
want. Mull it over. 

Sincerely, 

Brooks Lyman 
California 

Dear Mr. Lyman, 

Thank you very much for your recent letter. We are always 
open to constructive criticism and I welcome your views on 
the PFS series of software. I look forward to your upcoming 
article submission. 

Your ideas on novices has been duly noted and as early as 
the June-July issue we will adopt some of these ideas. An entry 



level column will soon appear to help guide the novices over 
the sometimes rough waters of learning the Apple ///. 

Dear ON THREE, 

It was really nice to see the new publication dedicated to the 
Apple ///. I thought you might like to know that there is a dedi- 
cated Apple /// SIG operating online SOURCE at PUBLIC 21 
DIRECT. The user group has been operating for over a year. We do 
charge a membership fee of $20 and the SIG is closed to non- 
members. I can be contacted through SMAIL (to ST0823) for 
membership information and sample SIG material. 

The SIG maintains an online interactive bulletin board and a 
twenty plus item data base containing programs and other material 
for downloading. As an example, the data base contains an auto- 
logon dialer for use with hard disk, and even a game. The bulletin 
board provides an online interactive forum for exchange of infor- 
mation, for example a notification of a soon to be released co- 
processor card (emulates IBM PC), and for online help with Apple 
/// specific problems. We maintain a listing of over 1 75 Apple /// 
native programs (no CP/M programs) currently available. The 
membership consists of some highly qualified programmers, 
hardware types, business users, and even an Apple rep. or two. 

ON THREE has received very favorable reviews from our 
members. Keep up the good work! 

Sincerely, 

Ernest Raba 
North Carolina 

Dear Mr. Raba, 

I'm glad to hear of the Apple /// SIG on the SOURCE. As 
Apple /// users we need to band together in every way shape 
and form to help each other. 

Dear hAr. Consorti, 

Thank you for an excellent publication. I have recently installed 
your ON THREE O'clock and I am very happy with it, thanks. 
Another item you might consider offering would be 64K RAM add 
on chips for those of us with 128K RAM Apple ///'s. There dre 
many 200ns Apple compatible chips that will work with the 5 volt 
memory board in the ///, all of them much cheaper than the 
Apple price of $28/chip. 

With regard to the question of utilities to edit Business Basic 
programs that was raised by John Miller in the March issue, most 
Apple ///owner's have a fantastic editor available in Apple Writer 
///. This program can be used to global search/edit/replace as 
well as insert and move whole blocks of Basic code. In short, all of 
the features that are available to edit text can be used to edit Basic 
programs, including all of the Word Processing Language. The trick 
is to convert the Basic program i nto a text f i le that Apple Writer /// 
read. The following statement inserted as the first statement in the 
that you want to edit will do the trick: 

CREATE "Program. Name", TEXT: OPEN#1, AS OUTPUT/'Program- 
.Name",TEXT:OPEN #1 AS OUTPUT/'Program.Name":OUTPUT#1: 
OUTREC=255:LIST 1 TO 63999:CLOSE:END 

The procedure for doing this is outlined on page 33 of the Basic 
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manual. The "Program. Name" should be different than the name 
given to the original Basic program and should include the path- 
name if you want the text file saved on an alternate disk drive. The 
reserved word OUTREC sets the record length for the listing to 255 
rather than the standard 80 characters that appear on the screen. 
This keeps the carriage returns from messing up the listing on 
Apple Writer///. Once you have entered this line as the first line of 
your program, RUN it and it will create a text file with the name of 
"Program. Name". Now all that is left is to boot Apple Writer ///, 
load your text file, and edit away. When you have finished editing, 
save your file back to disk. To convert your file back to a Basic 
program, boot a Basic Disk and just type: 

EXEC Program. Name 

The disk drive will whirr for a while and each line of text will 
generate a ')' as it is being read into the Apple. When the disk drive 
stops, type LIST and your edited creation is now available to be 
RUN or SAVEd back to disk as a Basic program. Note that if you have 
any unintelligible lines that Basic does not recognize when you 
EXEC the text file, you will be unceremoniously given an error and 
the whole operation will stop. You must then go back to Apple 
Writer to find your fatal flaw. 

There are some interesting things that can be done with WPL on 
Apple Writer/// de. auto line numbering, subroutine library inser- 
tion, etc.), but I have found that the most beneficial use of Apple 
Writer is with very long programs that require major surgery. 

Now perhaps someone out there can help me 7 I am interested 
in getting FORTRAN running on my ///, but I have not found any 
way to do it yet. Also I am interested in contacting/// owners who 
^z usi ng the Source. Perhaps we could get together and exchange 
programs and tips, if so please contact me via SMAIL at 01 759. 

Sincerely, 

Eric M. Moeller 
Montana 

Dear Mr. Moeller, 

Thank you for your letter, I'm pleased that you like the clock. 
In respect to the 64K RAM chips, there is a small problem. 

The memory boards for the Apple /// are not all the same. 
The 128K machines that were shipped in the beginning had 
three rows of memory chips. Later on, these were replaced 
with a memory board that had ony two rows of chip sockets. If 
both of these rows were filled you had a 256K machine, 
otherwise you only had 1 28K. 

Since you can't just plug in chips to the old 128K memory 
boards to get 256K, there is no way I could offer a memory 
increase update at this time. With the Apple /// CP/M card 
you can run FORTRAN on your ///. However, you will have to 
do quite a bit of patching to get it to work. 

There is an Apple /// user group on the Source, it's operat- 
ing at PUBLIC 21 DIRECT. They do charge a membership fee of 
$20 and it is closed to non-members. Contact Ernest Raba 
through SMAIL at ST0823 for membership information and 
sample material. 

Dear Sir, 

Enclosed is my check and order for one of your ON THREE 



O'clock's for my Apple ///. 

In addition, I keep hearing rumors that Apple may be discontinu- 
ing support of the ///. Do you have any information as to their 
plans with respect to the equipment and future software. I did 
receive a letter which indicated a new version of Apple Writer/// 
with a speller package was coming out in 1983. 

Also, I am comsidering upgrading my 128K Apple/// to256K. 
Do you have any recommendations as to how I might do this at 
reduced cost 7 I would also like to have CP/M capability. 

And, do you have any information on the DataFax file program 
for the /// 7 Do you have any recommendations on a good terminal 
program to use with the Hayes 1 200 Smartmodem 7 Do you know 
of a Hi-Res Dump program for the Epson MX-100 with Graftrax? 

Appreciate your assistance and will look forward to receiving 
the clock unit. 

Sincerely, 



Richard N. McKinney 
Illinois 



Dear hAr. McKinney, 



Trust me, Apple is not going to discontinue support of the 
///, it is far too fine a machine. I do have some knowledge of 
future plans for the /// but I'm not at liberty to discuss them. 
However, what I know has convinced me that Apple is not 
going to drop the ///. 

The new version of Apple Writer /// should be available 
within a short time. Likewise, Apple Speller /// will be avail- 
able very soon. At this time the only way to upgrade your 
machine from 1 28K to 256K is the Apple way - high price! 

I also wish that Apple would lower the cost of the upgrade. 
The actual cost of the chips and memory board is no doubt 
much less than $250, so I can't see the reason for such a high 
margin on this item. You should be able to get an Apple /// 
CP/M card from any Apple dealer. Currently, this is the only 
Z-80 card that works with the ///. 

We don't have access to the DataFax file program for the ///, 
so I can't give a recommendation on it quite yet. On the 
subject of a terminal program for the /// and a Hayes 1200 
Smartmodem, Apple has a number of good communications 
packages for the ///.The one you should buy is contingent on 
what you are going to use it for. Your best bet would be to ask 
your local Apple dealer. They should know the one to suit your 
needs. 

Alpine Computing, Inc. sells a Hi-Res dump program for the 
and the Epson variety of printers. We are going to do a review it 
next time around. Check the 'Products Received' section of 
April-May issue for Alpine's address and phone number. 

Dear Sir, 

I have recently purchased an Apple /// and an Epson MX-100 
printer. The salesman who sold me these, convinced me that a 
interface card would be sufficient. Since that time, I have read 
articles, including the Epson owners manual, which suggests that 
we should hook up the Apple /// with a UPIC. Would you explain 
the difference between the serial and UPO What limitations will I 
face with the serial card 7 

lam happy there is finally a magazine for Apple ///owners. My 
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wife and I are looking forward to your next issue of ON THREE. 

Sincerely, 



Thomas Spreitler 
Illinois 



Dear Mr. Spreitler, 



First of all, I hope that you are talking about the built-in serial 
port that the Apple /// has and not a plug in card because a 
serial interface to an Epson is fine, I used the built-in serial port 
to connect to my MX-100 for over two years without any 
problems. 

If you are talking about a plug in serial card that your dealer 
sold you, I'd bring the darn thing back to the dealer and 
demand a refund, because he is cheating you! If your Epson is 
set up to receive a serial signal, it will work fine hooked up to 
the built-in serial port and does not need another serial or 
parallel card. 

The only reason to buy and use any plug in interface card is 
to connect a piece of hardware to your computer. Since the 
MX-100 works fine hooked up to the built-in serial port, there 
is no need for a plug in card except in the case that you are 
already using your serial port to connect another item such as 
a modem to your ///. 

If you have any further questions, please don't hesitate in 
writing again. 

Gentlemen, 

I am enclosing my check for $30 to cover a one year subscription 
to ON THREE. For some reason, I had not heard that this magazine 
was about to be published and I just happened to run into the first 
copy at my local computer store. 

While I am in the process of enrolling, may I also send along two 
items that you may be able to help me with. 

My Apple /// is connected to a NEC 7720 Spinwriter. After 
considerable experimentation I found that it would work fine if the 
NEC cable was connected to the modem eliminator cable that 
came with the Apple. However, the '.PRINTER' driver as originally 
set up by Apple could not be used. Instead a more complete 
description of the driver configuration had to be supplied by using 
the '.RS232' driver and alternating the parameters, this however is 
not my problem - as I said, this combination is now working fine. 

In Apple ][ emulation this same set up gave continual data error 
signals which I finally ascribed to the fact the "driver configuartion" 
in the emulation mode (which I could not access) did not provide 
proper "handshaking" with the printer, so it overflowed the printer 
buffer with data and stopped it. By choosing 300 baud when the 
emulation disk is booted, and setting the printer for 300 baud, all 
went well, but relatively slowly. 

Can you offer a solution that will permit me to operate my printer 
at 1200 baud when I am using the Apple ][ emulation mode? 

The second item concerns my displeasure with a software 
package - Apple /// Business Graphics sold by Business & Profes- 
sional Software Company of Cambridge, Mass. I had a hard time 
getting this package to print anything but when I finally figured out 
the correct cabling, it transmitted text and numbers okay. I got no 
help in working this out from Business & Professional Software. 

I am still unable to print out graphs and the attitude at Business & 
Professiona Software is that they have no time to get into my 



problem, and besides, they don't have an Apple /// with which 
to experiment! When called upon to produce a graph, several 
pages of paper ^\z fed through the printer before activity starts. 
Then the graph that is produced is misshaped. That is, the axes sre 
not uniform and the tics dre not evenly spaced. The points appear 
on the paper but a line that is supposed to connect these points 
will miss them. 

I have tried everything that Business & Professional Software has 
suggested to no avail and I just thought that you and your readers 
would like to know about this problem with Apple /// Business 
Graphics, thank you for any help that you may be able to give me. 

Sincerely, 

John Lomartire 
Connecticut 

Dear Mr. Lomartire 

Unfortunately I can't give any real solution to your interfac- 
ing problem in emulation mode, but I will put the question to 
our readers. Hopefully someone will respond with an answer. 
You might try pressuring your local Apple reps, to see if Apple 
is going to release a new emulation diskette that could fix your 
problem. 

On the subject of Apple /// Business Graphics, I have had 
similar complaints against this company and product. My only 
advice here is to take the thing back to your dealer and get him 
to make it work with your system. If it won't work for him, 
demand a refund. 

It's crazy to pay for something that doesn't work and I'm sure 
your dealer will do everything in his power to rectify the 
situation. 

Dear hAr. Consorti, 

First let me say that I am delighted to have ON THREE available. It 
was and is much needed. You can count on my full support. I plan 
to call attention to it whenever and wherever I can. Although I 
certainly would prefer a monthly magazine, I would also prefer a 
bi-monthly one as against none at all if there has to be a choice. 

One suggestion and request. It would be nice if ON THREE 
would let us know what is goi ng on at Apple that is relevant to the 
///. For instance, it was through pure luck I found out several 
months ago that the Utilities Diskette has been updated. And only 
tenacity and perseverance at continually inquiring led me to find 
out a few weeks ago that the long awaited SOS Reference Manual 
and Device Driver Writer's Guide were available. Neither Apple nor 
their distributors have been of much help in this regard. One 
exception, it was through Apple I found out about ON THREE. 

A question. There is an Applegraphics II software which allows, 
in particular, one to do interactive 3-D graphics. As I understand it, 
it is in P-Code. I also understand that much Apple ][ Pascal software 
can be used on the Apple ///. Would anyone know for certain 
whether or not Applegraphics II can be used on the Apple /// 
with Pascal 7 

Re: things I'd like to see in ON THREE. A discussion of the 
emulation software, particularly in relation to possible modifica- 
tions. For instance, could the 48K limitation be removed 7 There is 
plenty more memory available, could a language card emulation 
be written 7 If not, I would like to understand why. Something else I 
would be interested in reading about is a hardware modification 
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which would allow me to use a cassette with my Apple /// or 
with the Apple ][ emulation mode. 

Sincerely, 

Andre M. Weitzenhoffer 
Oklahoma 



Business applications and accounting packages would be of 
greatest interest to the undersigned. 

Sincerely Yours, 

Charles F. Schreiber, Jr. 
California 



Dear Mr. Weitzenhoffer, 

Thank you very much for your support, we need all the 
coverage we can get, and the best kind is a satisfied customer! 
We will go to a monthly format as soon as possible, hopefully 
by August. 

In the future we will be telling you of relevant happenings in 
the /// world (updates, new products, etc.). For now let's just 
say that even with my connections it's hard to find these things 
out. Thank you for telling me of the Utilities diskette update, I 
haven't heard about it. 

The new SOS manuals are great, if you were using the old 
photocopied manuals, your programming life will be much 
easier now! They are very nicely typeset with a lot of great 
information. 

Since the /// has the Apple ][ Turtle-Graphics Library UNIT, 
you could use Applegraphics ][ on the /// if you had access to 
the source code and could then re-compile it. Even if you 
could get the source from Apple (you can't) you would be 
under some serious restraints. Among them, only the Black/ 
White 280 by 192 graphics mode is available. The routines are 
also much slower than the Apple ][ counterparts. You can't use 
it in emulation mode because it needs a 64K system to 
operate. 

We are planning a series on the emulation mode and modifi- 
cations to the emulation disk. I haven't studied it but I don't 
believe that a language card emulation could be written due 
to the format of the ///'s memory. Once we publish this letter 
maybe someone could also respond about the lack of a 
cassette port in the emulation mode. 

If you have any further questions, please do write again. 

Gentlemen, 

THANK GOD! Something for the Apple ///! Please send it ASAP. 

Thank You, 

J.B. Moore 
New York 

I couldn't resist putting that one in! 

Dear hAr. Consorti, 

Enclosed is my check to purchase a subscription to ON THREE. I 
found a copy of the January issue and am very impressed. 

I encourage you to maintain the advertising policy indicated in 
your open letter to the readers. This is one way a non-computer 
expert will have to evaluate products offered by various manufac- 
tures. At least one will know if they are advertised in ON THREE a 
knowledgable computer person has reviewed the product and 
found that it does not contain material flaws. 



Dear Mr. Schreiber, 

Thank you for your letter, I appreciate your comments 
regarding our advertising policy. We will have reviews on some 
major accounting packages in the very near future. 

Dear ON THREE, 

If my information is correct, there dre approximately 80,000 
Apple /// users throughout the country. Now, that's a user's group 
of potentially immense power and it behooves Apple Computer 
to inform that community of the existence of ON THREE. With the 
recent drop in price of the 256K Apple/// and the burgeoning of 
significant software, the number of ///ers should grow well 
beyond the 100,000 mark, thus making ON THREE'S challenge 
clean to produce the best and the most informative computer- 
related publication around. You've made a good first step in that 
direction. 

Sincerely, 

Michael Sexson 
Montana 

Dear Mr. Sexson, 

At this point in time there are approximately 1 00,000 Apple 
/// users out there. You're right in your assumption that there 
is a potential for a very powerful user's group. With help from 
people like yourself, Apple /// users will soon band together 
for their common interest. 

Sometime in June of this year, Apple will do an Apple /// 
user mailing that will include a notice about ON THREE. The 
problem is this: Out of 1 00,000 Apple /// users out there, less 
than 20,000 have sent in their registration cards. 

Since those cards are the only way Apple knows where 
Apple /// users are, the mailing will reach less than a fifth of 
the Apple /// populace. Therefore, if you know of other 
Apple /// owners, tell them to mail in their registration cards. 
It's probably the only way they will ever find out about future 
Apple /// products information. 

Dear Bob, 

As a bust nessman I look on my /// as a tool that either works for 
me, or is ineffective when used for the tasks for which it was 
purchased. After a short, initial 'Software Shufle' my/// has per- 
formed admirably. I am most satisfied. While I am almost entirely a 
user of 'Pre-Canned' software, your publication will fill several 
needs that have not been met by anyone else to date. 

The first and most important of these needs is one that you 
addressed in your editorial in the Feb. -March issue. That is, primar- 
ily, to bring pressure to bear on Apple Corp. to release all technical 
info, on the ///, to help those of us who have spent sizeable 
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dollars on their product to use it more effectively. Apple has not 
exactly bent over backwards to assist either myself, or my local 
dealer in answering several question/problems that have arisen 
since my purchase. 

The non-existant SOS manuals have been a major irritant to me, 
as has been the non-existant Backup ///, and the non-existant 
Clock/ Calendar. Now that Backup /// is online, and I am buying 
your clock the minor irritants dre over. The major one remins, 
however. Apple Computer Corp. still is considerably less suppor- 
tive than the good software houses (State-Of-The-Art, and Quark 
come immediately to mind), and yet I spent a lot more money with 
Apple than I did on software. Have you tried calling tech. support 
with a question? "This is technical support, all of our technicians 
are busy right now. Please leave your name and question, and if we 
get any free time in the next decade, we will return your call . . ." 

The second need that you will/are filling is the need for a forum 
of ideas. At three dollars per issue, all I have to do is find one little 
tidbit like Apple Writer ///'s I/O error as the result of writing too 
many times to the disk, and your magazine has paid for itself. All 
the other stuff is gravy! 

Finally, just by existing you are telling Apple Corp. that we Apple 
/// users give a damn what happens to the ///, and dre clamoring 
for support. Thanks to you we now have our own 'Micro-Lobby' in 
the hallowed halls of Cupertino. 

Keep up the good work, I look forward to my subscription. Now 
if you could just do something about that SOS manual. 

Sincerely, 



Ted Simpson 
North Carolina 



Dear Mr. Simpson, 



For what it's worth, I think the only thins that can be said 
about Apple's support of the /// is the followins line. Apple 
has grown so big, so quick that it is having problems keeping 
up with the demand for help in these matters. 

Much of it isn't Apple's fault, their rep. firms around the 
country and even the local dealers haven't supported the /// 
as they should. I've talked with the people at Apple and they 
are aware of the problem. It's just going to take some time 
before it's corrected. 

The SOS manuals are available now. You will probably have 
to order them from your dealer though. The product number is 
A3L0027. After working with them for a couple of months I 
don't think they are for the average user. They contain much of 
the technical details of SOS and are therfore hard reading for 
most people. /// 

Products Received: continued . . . 
STOCK PORTFOLIO SYSTEM 

The STOCK PORTFOLIO SYSTEM by Smith Micro Software is a 
personal investment accounting, record keeping and control sys- 
tem designed to provide you with the facts you need to make 
informed investment decisions. It covers a wide range of invest- 
ments, including stocks, bonds, options, multiple CD, bank, credit 
union and money market accounts. 

It is menu driven and very flexible. You can let the STOCK 
PORTFOLIO SYSTEM access the Dow Jones News/ Retrieval service 
to get stock quotes. The terminal mode allows you to reach out 



beyond your Apple for direct access to the nation's financial news 
and other services. 

The STOCK PORTFOLIO SYSTEM has a suggested retail price of 
$185 and is available for the Apple II, Apple /// and IBM PC. 

Smith Micro Software, P.O. Box 604, Sunset Beach, California 
90742.(213)592-1032. 

VersaForm 

VersaForm is the Business Form Processor. Utilizing the familiarity 
and structure of existing paper forms, VersaForm accelerates the 
speed and accuracy of processing information. Because it emu- 
lates current paper handling procedures, VersaForm is very easy to 
tailor to specific uses. 

This package makes it possible foryou to doyour business data 
handling tasks on a computer, using what you already know. 
Instead of requiring that you enter the world of the programmer, 
VersaForm works in the familiar world of business forms and deals 
with your data just the way you do now - on paper, but with the 
speed and power of a computer. 

A complicated system, the VersaForm package takes a while to 
get to know, but it is worth it. To be reviewed in the June-July issue. 

Applied Software Technology, 14125 Capri Drive, Suite 4, Los 
Gatos, California 95030. (408) 370-2662. /// 

REVIEW ON: Everything: continued. 

Equipment used in this review: 

128K Apple/// 

1 external floppy drive 

1 ProFile hard disk 

Program: CRITICAL PATH SCHEDULING for the Apple /// 

Version: Revision #4, 4/6/82, Release 2.0 

Contents: Boot and program diskettes, User's manual. 

Programming language: Business Basic 

Operating System: Standard SOS 

Copy Protected: No 

Disk Warranty: 90 days 

Backup disk included: No 

Cost: $495 

The Bottom Line 

CRITICAL PATH SCHEDULING 

Performance: Good 
Documentation: Good 
Ease of use: Good 
Error Handling: Good 
Over All Rating: B 



The Editor's Block: 



Continued 



One last item before I go. We will publish notices of any Apple 
/// club or user group, so if you know of one - please tell us! The 
more local help an Apple /// user can get the better. 

That's all for now. Remember, if you have any questions or 
problems that your dealer can't answer - Ask ON THREE! /// 
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DOS File List 








by Bob Consorti 



Many Apple /// utility programs allow the user to access in 
one way or another Apple ][ DOS files. But none of them (to 
my knowledge) let the user see what files are on the DOS diskette. 
To the average Apple /// owner this means that they must do one 
of two things, 1 - Remember the exact file name, or 2 - Use the 
emualtion disk to boot the DOS disk and then do a catalog! 

Since Apple ][ file names can be longer (30 vs. 15) than their 
Apple /// counterparts, the chance of getting it right is slim. Also, 
booting the emulation disk takes time and is a big hassle. What's a 
poor Apple /// user to do 7 

The answer is quite simple - read on! Since the utility programs 
mentioned above usually are written in Pascal I wrote a routine in 
that language that allows you to list the files on a DOS 3.3 diskette. 
Just as in the last issue we will implement it as a UNIT so that all your 
Pascal programs can use it. 

Listing # 2 is the actual Pascal Intrinsic UNIT that does the work. 
Now all programs written in Pascal can give the user the option of 
seeing the catalog of an Apple ][ DOS diskette. Like the SOS file 
lister from the last issue, it will send the output wherever you want 
('.CONSOLE','. PRINTER', disk-file . . .) and list the files on an arbi- 
trary sized viewport. 

Program Listing #1 is an example of a Pascal program that uses 
the unit to list Apple ][ DOS files. If you have been following along, 
it is very similar to the SOS file listing test program from the last 
issue. Very simply, it just calls the routine list_DOS_Di rectory' with 
the appropriate parameters and the unit returns after listing the 
DOS directory (if possible). 

The test program and the DOS file listing UNIT use many of the 
same routines of the SOS file lister from the last issue, so I will not 
go into details of how the program works. The Pascal structure of 
DOS file entries was taken from the November/December 1981 
issueofCall-A.P.P.L.E. Dr. Wo wrote the original Apple] [implemen- 
tation of the DOS file list, and I did all the Apple /// changes. 

If you want to use this program and UNIT with your other Pascal 
programs, first type in Program Listing # 2 and compile it with the 
name 'DOS. STUFF'. Next type in Program Listing # 1 and compile it 
with the name TEST'. Before you can use the program, you must 
first add the UNIT to your SYSTEM. LIBRARY. 

Going through it step by step, at the main command level 
X)ecute the file 1IBRARY.CODE'. When the screen prompts you 
with 'Output file — ►', enter 'NEW.LIB'. Make sure that the diskette 
you d^e putting 'NEW.LIB' on has enough room to hold the sum of 
the old library and a little bit more. When the screen prompts you 
with 'Input file — ►', enter '.D1/ SYSTEM. LIBRARY'. Now type '=' to 
copy all the library segments from the old library to the new one. 

When the disk drives have stopped making noise, type 'N' to 
choose a new file and then 'DOS. STUFF' and now press 'RETURN'. 
Next look on the screen under the prompt 'Output file - ' and 
find the first two slot numbers that aren't occupied. Type 1 
<space> 1 st empty slot number <space> and then 2 <space> 
2nd empty slot number<space>. Finally type 'Q' to quitand then 
enter any copyright notice you wantto include. Lastly, use the filer 
to remove the old 'SYSTEM. LIBRARY' and transfer this new library 
onto your system diskette with the new name 'SYSTEM. LIBRARY'. 

Once you have correctly installed it, all of your programs can use 
it. Now you can execute Program Listing # 1 and test out the new 
UNIT by cataloging DOS diskettes. If you don't want to type in the 
programs, or don't have Pascal you can purchase the April-May 



Disk Of the Month which has all the necessary programs in it. Once 
again that's all for now. Next time, who knows 7 I've been working 
on assembly language routines that will enable programs to save 
and load text screens to and from disk to memory. Hopefully it will 
be completed in time for the next issue. /// 

DOS File List: Program Listing #1 

PROGRAM DOS List; 
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USES DOS List Stuff 



This prograe uses the Intrinsic unit 'DOS List Stuff to list the 
contents of my DOS directory. Note thafyou can define the nueber 
of lines to be listed per paqe. Thus, you can set a viewport and 
list the files according to the size of that text window. 



CONST Bell = 7$ 

Top_viewport ■ 2} 
norial = 17; 
inverse * 18; 
Escape * 27; 
Clear_viewport * 28; 

TYPE Counter « INTEGER! 



{ Contains the routines to list a DOS directory 

{ You eust install it into your SYSTEH.LIBRARY. > 

{ See article for instructions. } 

{ Causes a beep on the internal speaker } 

{ Sets the top of the currently defined viewport } 

{ Sets norial video output (Unite on Black) > 

{ Sets inverse video output (Black on White) } 

{ The ASCII nueber of the ESCAPE character > 

{ Hates the cursor and clears the viewport } 



VAR Out Path, Nui Str: STRING; 
In Rue, Error'code: INTEGER 
Lines on window: INTEGER; 



{ The output files ) 

{ returned by the Unit DOS_List.Stuff } 

{ The nueber of lines in the current viewport } 



PROCEDURE Set titles; 
VAR i: Counter J 



{ Sets the tain page heading for the entire prograi ) 



BE6IN 

WRITE (CHR (Clear viewport)); 

WRITE ('Disk Utility Pak3M| 

60T0XY (66, 0); 

WRITELN ('Copyright 1983'); 

WRITE ('by Robert Consorti'); 

60T0XY (68. 2); 

WRITELN ('by ON THREE'); 

FOR i :■ 1 TO 10 DO 
WRITE (' '); 

WRITE (CHR (Top viewport)) 
END; ( of PROCEDURE Set titles } 



PROCEDURE Print Error; 

var Ch: char; " 



{ Routine to print out the error eessage } 



BEGIN 

WRITELN (CHR (Bell)); 

WRITELN ('WARNING: Error I', Error code); 

GQTQXY (0.23); 

WRITE (CHR (inverse), 'Press any key to continue', CHR (noreal))? 

READ (KEYBOARD. Ch) 
END; { of PROCEDURE Print Error } 



FUNCTION Str_to_int (nue.str: STRING): INTEGER} 

VAR Placejiue, Tetp_int: INTEGER; 
i, Poi_cnt: counter; 

BEGIN 
Tetp int:* 0; Pos cnt :■ 0; 
FOR I :> LENGTH (Rue str) DOWNT0 1 DO 
BE6IN 
Place nue !■ 0RD (Nub str til) - 0RD CO'); 
Pos cnt :» Pos cnt + I; 

Tetp int :* Teip int ♦ TRUNC (PWR0FTEN (Pos cnt - 1)> ♦ Place nui 
ENDI " 
Str to int :» Teip int 
END; X of FUNCTION SEr to int } 



PROCEDURE Get Paths; 
BE61N 

WRITELN (CHR (Clear viewport)); 

WRITELN ('(RETURN for ".CONSOLE", ESCAPE RETURN to exit)'); 

WRITE ('Enter where I should send the listing -> ')} 

READLN (Out Path); 
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WRITELN? 

IF (LENGTH (Out Path) « 0) THEN 

Out Path := '7CQNS0LE'; 
IF (Out Path [1] * CHR (Eicapt)) THEN 

EXIT TPR06RAH); 
WRITELN ('Enter tht unit nutber of thi disk to list '){ 
WRITE ('Built in disk is 4, 2nd drive is 5, etc. -> '){ 
READLN (Nui Str); 
In Nut :» SEr to int (Nut Str) 
ENDJ"{ of PROCEDURE Get_Path"s ) 

BEGIN { Nam prograt > 
tot.titlm 

Linis on *indow := 20; £ There ire twenty lines on this viewport } 
REPEAT " 
Get.Paths; 
Error codt :» 0; 

List DOS Directory (In Nut, Out Path, Lines on window, Error codt) 5 
IF (Error_code <> 0) TREN 
Print Error 
UNTIL (2 ? 2 <> 4) 
END. { Of PROGRAM D0S_List > 

DOS File List: Program Listing #2 

UNIT D0S_List_Stuff; 

«Httttt«t*#t«t«ft*ttt«tt»4t»*t#ttt#t*fft««tt*«t##tt#t«tt«#««t#t#4ttt««#ft 
t -._- « 

t Disk Pak3: DOS File List ! Copyright 1983 by I 

t , (, THREE ! 

* by Bob Coniorti ! April-Hay, 1983 I 



* This Intrinsic Unit gives any Pascal prograt tht ability to list the 

* files on any Apple ][ DOS diskette. 
I 

» Original Pascal definition for the DOS file structure is frot the 

* the Novetber/Decetber 1981 edition of Call-A.P.P.L.E. by Dr. Mo. All 

* Apple /// changes and enhancetents by Bob Consorti. 
t 

* Please read the article and the prograt List It to see how to install 

* and use this Intrinsic Unit. 
t 

f*mt*tmttt«t#ttm«##m**mtmmt**t*m#«m«m*««t#t**mt*«tt« 



$E+ } 



( This cotpiltr option allows for private files within tht UNIT > 



NTRINSIC CODE 25; { Only one seotent; files are private to this UNIT > 
{ because of the 'E+* cotpiler option shown above. } 

NTERFACE 

PROCEDURE List DOS Directory (VAR Unit Nut: INTE6ER; VAR Out Path: STRING; 
VAR Lints_on_window, Error: INTEGER)} 

IMPLEMENTATION 

m*mtmttt»mttmtmtmmtmtt*m#mtmtt*4tit*4t#ttm*«*** 

Tht procedurt 'List.DQS Directory' is PUBLIC and can be used by your 
Pascal host prograt as follows: 

INPUT to List DOS Directory: 

1) Unit Nut - TRe Unit Nutber of tht disk drive with tht DOS disk. 

2) Qut_Path - Where to send the listing. 

3) Linii,on_window - The current nutbtr of vertical lines in tht 
vitwport. Ustd to deternne where to take a 
page break when listing to tht '.CONSOLE'. 

Output frot List DOS Directory: 

1) The listed 3irectory. 

2) Error - The error code (as indicated by IORESULT) for tht last 
cotpleted Input/Output operation. 

PROCEDURE List DOS Directory; 

CONST nortil • 17} ( Sett nortal video output (White on Black) ) 

inverse * 18; { Sets inverse video output (Black on White) } 

t«c • 27| { Ascii valut for tht kty 'ESCAPE' } 

dear_viewport * 28? { Hotes the cursor and clears the viewport } 

Doijmx * 30; ( Haxiaut ltngth of a DOS file natt } 

TYPE 
Byte = 0..255; 
Dirringt « 0.. 105? { Range of tntries in a DOS directory } 

Sectbuffer « PACKED ARRAY [Byte) Of Byte; 
Blockbuffer* PACKED ARRAY CI. .5123 OF Byte; 



Link = PACKED RECORD { Used to designate track/sector cotbinationt } 
Tracknut: Byte; 
Sectnut: Byte 
END; 

Dosfilekinds ■ ( DOS file types } 

(Volinfo, Unknown, Dftext, Df integer, Applesoft, Binary); 

( PtKiJ fortat for tht infortation contained in a DOS directory entry } 

DosDirentry = PACKED RECORD 
CASE Dfkind: Dosfilekinds OF 
Volinfo: { This is the volute info > 



(Dunitnut: Byte; Dnutentries: Dirrange); 
Unknown, Dftext, Dfinteger, Applesoft, 
Binary: 
(Filejsl: Link; { Location of the files Track-Sector list > 
Locked: Boolean; ( Designates whether the file is locked > 
Nate: STRIN6 [Dos tax]; 

Sectorcount: Byte! ( Nutber of sectors allocated } 
END; 
Dosdirectory = ARRAY [Dirrange] OF DosDirentry; 

VAR 

Device: TEXT; { Where to send the listing 1 

Dosdir: Dosdirectory; { The current DOS directiry } 

Ioerror, Lint_count: INTEGER; 



{ If an error occurs, leave the unit } 
{ with an appropriate error nutbtr. } 



PROCEDURE Trap IQ error? 
BEGIN " " 
IF (IORESULT <> 0) THEN 
BE6IN 
Error :» IORESULT; 
CLOSE (Device); 
EXIT (List DOS Directory) 
END " " 
END? { Of PROCEDURE Trap 10 error > 



PROCEDURE Set Out device? ( Sets the appropriate output file } 
VAR i: Byte; " " 

BE6IN 
IF (LENGTH (Out Path) « 0) THEN 
BEGIN 
Error :» 7; (An illegal Pathnatt } 
EXIT (List DOS Directory) 
END " " 
ELSE 
BEGIN 
FOR i :« 1 TO LENGTH (Out Path) DO 
IF (Out Path [iJ IN ['a T ..'z']) THEN 
Out Pith m := CHR (0RD (Out Path til) - 32)? 
IF ((Out Path <> '.CONSOLE') AND TOut Path <> 'II')) THEN 
IF ((Out Path <> '.PRINTER') AND (Out Path <> '.SPRINTER') AND 
(Out Path <> '.PPRINTERM AND (Out Path <> '16')) THEN 
IF"(P0S ('.TEXT', Out Path) « 0)"THEN 
IF (LEN6TH (Out Path") < 11) THEN 
Out Path :« CONCAT (Out Path, '.TEXT'); 
(II0CHECK- } ' 

REWRITE (Device, Out Path); 
CLOSE (Device, L0CK)[ 
Trap 10 error; 
REWRlTE~(Dtvice, Out path)? 
{II0CHECK+ } 

Trap 10 error 
END " " 
END? { Of PROCEDURE Set Jut .Device > 

PROCEDURE New Page (Message: STRING); 
VAR Ch: CHAR;" 

( Protpts the user to press a key for tort files, or to end } 
BE6IN 

GOTOXY (0, 23) 5 

WRITE (CHR (inverse), Message, CHR (nortal)); 

READ (KEYBOARD, Ch); 

WRITE (CHR (clear viewport)) 
END? { Of PROCEDUR£~New_page > 

PROCEDURE Check console; { Checks for various options > 
BEGIN 
IF ((Out Path <> '.CONSOLE') AND (Out Path <> 'fl')) THEN 

WRITE I'.') 
ELSE 
IF (Line count » Lines on window) THEN 
BEGIN " " " 
New_page ('Press any key for tore'); 
Line count : a 2 { The end of a page - so takt a ntw ont. } 
END 
END; { Of PROCEDURE Check.consoie } 



FUNCTION Readtrksec (Trksec: Link? VAR 3b: Sectbuffer; 

VAR lotrror: INTEGER): Boolean? 
{ this function reads the sector nutber 'Trkstc. Sectnut' frot 
tracknutber 'Trkstc. Tracknut' on disk drive nutber 'Unit Jut' } 

VAR 



ilock: Blockbuffer; 
Blocknut, Offstt: INTE6ER? 



BE6IN 
With Trksec DO 
BE6IN { Cotpute the half-block corresponding to the desired sector } 
IF (Sectnut IN [0, 15]) THEN 

Blocknut := Sectnut 
ELSE 

Blocknut :* 15 - Sectnut? 
IF (ODD (Blocknut)) THEN 

Offset :» 256 
ELSE 

Offset :« 0? 
( Now cotpute blocknut offset frot track } 
Blocknut := (Blocknut DIV 2) + 8 # Tracknut 

a i /a* .iaoo EMD5 { * lth Trksec D0 } 
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UNITREAD (Unitnui, Block, SI2E0F (Block), BlocknueM 
{$!+} 

Iotrror :« Iortsult; 

IF NOT (Ioerror = 0) THEN 

Readtrksec :« False 
ELSE 
BE6IN { Write into tht sector buffer ) 
NOVELEFT (Block [Offset ♦ 13, Sb, SIZEOF (Sectbuffer)); 
Readtrksec .*= True 
END 
END; { Of FUNCTION Readtrksec } 



PROCEDURE Displayentry (Dt: Dosdirentry); 
BE61N 
WITH De DO 
BEGIN 
IF Locked THEN 

WRITE (Device, '§') 
ELSE 

WRITE (Device, ' ')J 
CASE Dfkind OF 
Dftext: WRITE (Device, 'Text file')! 
Df integer: WRITE (Device, 'Integer '); 
Applesoft: WRITE (Device, 'Applesoft'); 
Binary: WRITE (Device, 'Binary '); 
Unknown: WRITE (Device, 'Unknottn ') 
END; 

WRITE (Device, Sectorcount: 6, ' ')} 
WRITELN (Device, Nate); 
Line Count '.* Line_Count ♦ 1{ 
Check" console 
END ' 
END; { Of PROCEDURE Displayentry ) 



PROCEDURE Displayheader; 
BEGIN 

WRITE (Device, ' Type')} 

WRITE (Device, ' Sectors': 11); 

WRITELN (Device, ' File naee')! 

WRITELN (Device. ' 

END! { Of PROCEDURE Displayheider } 



PROCEDURE Displaydir; 
VAR 

Cuisectors: INTEBERf 

Count: Dirr angel 

BE6IN 
Cuesectors :*0{ 

IF (Dosdir£03.Dnueentries * 0) THEN 
BEGIN 
WRITELN (Device, 'The directory is eepty!'); 
Wen Page ('Press any key to continue') 
END " 
ELSE 
BE6IN 
Displayheader; 

FOR Count :» 1 TO Dosdir [Ol.Dnuatntries DO 
BE6IN 
Displayentry (Dosdir [Count]); 
Cuisectors :* Cuesectors + Dosdir [Count 3. Sectorcount; 
END; 
WRITELN (Device); 

WRITE (Device, Dosdir [03.Dnuientries,' files on disk, ')( 
WRITE (Device, Cuesectors.' sectors in use'); 
Net* Page ('Press any key to continue') 
END " 
END; { Of PROCEDURE Displaydir > 



PROCEDURE Catalog; 
CONST 
Nextlink » 1; 

Zerobase =11; 
Entrylength*35; 
Haxindex = 7; 



{ Relative byte 1 of directory sector is link to 
the next directory sectory } 
{ First byte of file info in a directory sector } 
{ DOS directory entries occupy 35 bytes } 
{ flaxisui of 7 directory entries in a sector } 



FUNCTION Eodirsector (VAR Index: Indexrange; VAR Dirsector: Sectbuffer; 

VAR Entrybase: Byte): BOOLEAN; 
VAR 
Nofile: BOOLEAN; 

BEGIN 
Nofile := True; 

WHILE (Nofile AND (Index < Haxindex)) DO 
BEGIN 
Index :» Index ♦ 1( 

Entrybase := Zerobase + (Index - 1) * Entrylength; 
Nofile :« (Dirsector [Entrybase] IN [0, 2553) 
END; 
Eodirsector :» Nofile 
END; { Of PROCEDURE Eodirsector ) 



PROCEDURE FillJhr.Entry (VAR De:Dosdirentry; VAR Eb: Entrybuffer); 
CONST 
Offset « 4; { Relative byte 3 is the beginning of the file naee } 

VAR 
J, Kind: Byte; 
Nonblank: O..Dos_eax$ 

BE6IN 
WITH De DO 
BE6IN 
Filetsl.Tracknue :» Eb [13; < Here is the track nutber ) 
Filetsl.Sectnue :* Eb [23; { Here is the sector nueber } 
Kind := Eb [33; { Here is the file type } 
IF NOT ((Kind NOD 128) IN [0, 1, 2, 43) THEN 

Dfkind :* Unknown 
ELSE 
CASE (Kind HOD 128) OF 
0: Dfkind :* Dftext; 

:= Df integer 5 
Applesoft; 
Binary 



{$R-} 
<IR+) 



i: Dfkind 
2: Dfkind 
4: Dfkind 
END; 
IF ((Kind DIV 128)=1) THEN 

Locked :« True 
ELSE 

Locked :» False; 
FOR J :» TO (Dos eax - 1) DO 
BE6IN "{ Set the high bit Ion } 
Eb [Offset ♦ J3 := Eb [Offset ♦ J3 NOD 128; 
{ No*, el innate any xierd characters ) 
IF NOT (Eb [Offset ♦ J3 IN [Space.. Tilde3) THEN 
Eb [Offset ♦ J3 :- Space 
END; 
{ Find the leftaost trailing blank in the naee field } 
Nonblank := -SCAN (-Dos eax. <> ' ', Eb [Offset ♦ Dos eax - 13)J 
{ Non blank«0 if and onTy if there are no trailing blanks } 
( Initialize the length of 'naee' } 

Naee [03 : = CHR (Dos.eax - Nonblank); 



Space 
Tilde 

TYPE 
Indexrange « 
Entrybuffer 

VAR 



- 32; { ASCII space ) 
•126? ( ASCII Tilde > 



0.. Haxindex; 

- PACKED ARRAY [1.. Entry length 3 OF Byte; 



Sectorindex: Indexrange; 
Entrybase: Byte; 



Dir Link: 
Dir"Sector: 
NexEentry: 
Entrycount: 



Link; 
Sectbuffer; 
Entrybuffer; 
Dirrange) 



FUNCTION Eodir (Dirlink: Link): BOOLEAN; 
BEGIN 
With Dirlink DO 
Eodir :» ((Sectnue » 0) AND (Tracknue 
END; { Of FUNCTION Eodir } 
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( Finally eove in the naee } 
HOVELEFT (Eb [Offset]. Naee [13, LENGTH (Nate)); 
Sectorcount := Eb [343 ( Here is the sector count (HOD 256) > 
END { With De DO } 
END; { Filldirentry > 

BE6IN { Catalog > 
WRITE (CHR (clear viewport)); 
IF ((Out Path <> \ CONSOLE') AND (Out Path <> '#!')) THEN 

WRITE T'Writing.'); 
WITH Dir Link DO 
BE6IN " 
Tracknue :» 17; { Beginning track of the DOS directory ) 
Sectnue :» 15 { First sector of the DOS directory > 
END; 
Entrycount :* 0; 
WHILE NOT Eodir (Dir Link) DO 
BEGIN 
IF NOT Readtrksec (Dir.link, Dir.Sector, Ioerror) THEN 

Trap 10 error 
ELSE " " 
BEGIN 
Sectorindex :■ 0; 

WHILE NOT Eodirsector (Sectorindex, Dir Sector, Entrybase) DO 
BEGIN 
HOVELEFT (Dir Sector [Entrybase!, Nextentry, Entrylength); 
Entrycount :* Entrycount+l; 
Filldirentry (Dosdir [Entrycount3, Nextentry) 

END; { Of ELSE BEGIN } 
WITH Dir Link DO 
BE6IN " 
Tracknue :« Dir Sector [Nextlinkl; 
Sectnue := Dir Sector CNextlink+13 
END 
END; 
WITH Dosdir[03 DO 
BE6IN 
Dnueentries :» Entrycount; 
Dumtnue :- Umtnue 
END; 
Displaydir 
END; { Of PROCEDURE Catalog ) 



April/May 1983 



Program listing continued on page 18 



ON THREE 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// /// /// /// 



Changing The Character 

Of The 

Apple Dot Matrix Printer. 

(and the Prouuriter) 



by Timothy S. Smith 



Introduction: 

When I first purchased my Apple /// many moons ago I was 
very impressed at the ///'s ability to change its video character 
fonts so easily. Then when I purchased my Apple Writer /// 
program, there they were again, gothic, slant, stop and inverse 
character fonts, but alas only for my video viewing pleasure. Then 
recently I purchased the new Apple DMP (Dot Matrix Printer). 
Hope of gothic characters in my text again appeared on the 
horizon. But then I began to read the 27 page Apple DMP Owners 
Manual. The DMP manual is by far one of the most disappointing 
efforts I have ever seen from Apple. Yet, hope lives on in spite of 
adversity. While I began to study the small folded DMP reference 
card, I said to myself "what's this under character commands, Load 
Custom Character(s) 7 " Light at last! 

With the sliver of support from the DMP reference card I began 
to experiment with transferring the screen font data to the printer. 
This proved to be very difficult since not enough information had 
been provided with the "Operator's ManuaL'to operate this fea- 
ture of the Dot Matrix Printer. After some investigation I found that 
my authorized Apple dealer had the information I so desperately 
needed, printed in an Apple products manual dated June 24, 
1982. Oddly enough, I had found most of the data entry pattern 
prior to gaining the additional dealer support. 

Technical: 

If you don't care how it was done and just want to try it, skip 
ahead to "Operation". Before transferring the video font files from 
the disk to the DMP you must examine the nature of the data in the 
file. The video character fonts are made upof a matnx8 bitshigh by 
7 bits wide. This is illustrated on page 166 of the Standard Device 
Drivers manual. In the font file for each of the 128 possible char- 
acter representations dre 8 bytes of data, one for each of the 8 rows 
high. Because the screen is scanned from the top down, so dre the 
font format bytes. The extra bit in each row, the high order byte, 
determines the inverse display condition. 

The normal DMP character font on the other hand is constructed 
from left to right due to the mechanical action of the printer. 
Therefore the bytes of data for the DMP dre set 1 column of data at a 
time. The low order byte is the top edge of the character, allowing 
the high order (bit 7) to determine an underline. Which 8 of the 9 
DMP print wires are used is determined by whether or not the 
character font uses decenders or not. 

I chose the Pascal language to construct the conversion program 
due to it's extremely structured nature. This allows for faster more 
orginized data transfer. 

I n converti ng the video character font for the DMP the first order 
of business was to create a matrix for the entire character set. An 
array of 1 28 character definitions is read into memory. Each defini- 
tion is in itself 8x8 bits. Therefore the array is CH [CR, Row, Column] 
OF 0..1 , where CH is the entire matrix set. CR is the ASCII value of the 
character defined by Row and Column. Each entry in the dndy is 
either a or 1 (cell bit off or on). The font file is read using the low 
level Blockread function. All of the Bytes are automatically con- 
verted into a large single dimension array by the use of the, PACKED 



ARRAY OF 0..1, variable. Once read into the buffer variable the font 
cell bits can be transferred to the multi-dimension matrix array CH. 
Now you have a complete character set in memory in bit image. 
This bit image could be edited and restored in any order, even 
re-saved to the same file from which it came. 

The reason I have placed all of the font data in memory, as bits in 
an array, is so that the font cell definitions can now be saved in a 
different byte structure. Remember the printer must receive its data 
from the left side, not the top as the console. Transmitting the 
character font from memory to the printer is now easy. Just play out 
the bits in a different order creating a new series of 8 bytes for 
each character. But wait, the video font is only 7 bits wide. The 
console will automatically provide 1 dot space between charac- 
ters, but not so with the DMP. The 8th byte is to provide spacing 
between characters. When moving an inverse character set the 8th 
bit should be set to 127 or 255 depending on the 8th (bottom) 
print position condition. 

Now before sending the font bytes to the DMP you have to get 
it's attention, otherwise you get lots of garbage on the paper and 
lots of paper on the floor as well. The Attention code listed in the 
DMP reference card is <ESC> I. This is sent by printing an ASCII 
value for escape (27) followed bythecapitol I character (or ASCII 
36). The printer must first be opened like an interactive file, RESET 
(Printer,'. PRINTER'). For a better understanding on printer access 
from Pascal, review pages 163-164 in the Pascal Programmers 
Volume #1. After the printer device is open you then Write the 
attention code to it (e.g. WRITE (Printer, CHR (27), T) ; ). If you 
intend on using the alternate custom font dred, ASCII values 160- 
239, you must also precede the attention code with <ESC> - to 
inform the printer your characters will be no more than 8 bytes 
wide (e.g. WRITE (Printer, CHR (27), '-'),). If you send a custom 
character set which will be wider than 8 bytes, up to 16 bytes 
wide, you must precede it with<ESC> + (e.g. WRITE (Printer, CHR 
(27), '+');). 

After you have the printers attention you can begin sending the 
<list> as the reference card calls it. This list is the ASCII code 
definition byte, length byte and then 8 font cell definition bytes 
(See illustration below). This pattern is repeated until the entire 
character set has been transfered. To inform the printer that you 
have completed the task an ASCII code definition byte of ASCII 4 is 
sent. In the example program the character bytes dre transferred 
using the Unitwrite procedure to avoid character conversions 
done automatically in Pascal (See page 194 Pascal Programmers 
Manual #1). 

Operation: 

If you are an Apple ][ owner you need a friend with an Apple 
///. To use this program you will need an, Apple ///, Pascal, and 
perhaps Apple Writer ///. You could also try your friendly Apple 
Dealer. He may have already have read this. Ok Apple /// owners 
here we go. To begin, the Pascal program in this article must be 
typed intothe Pascal editorand then compiled. Nospecial library 
functions were used. After the program has compiled successfully, 
execute the program. Your first choice is to [C]onvert a font file to 
proper code for the Apple DMP printer or [L]oad a previously 
converted file from disk. 
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The conversion operation is simple. You will be asked for the 
complete path name of a font file (e.g. .D2/ROMAN). If you need 
further explanation of the path name see your Apple /// Owners 
Guide or Pascal Programmers Manual. The next question is whether 
you would like this set converted to [l]nverse or [N]ormal. Inverse 
prints a black space containing a white letter. By the way selecting 
Inverse for the Inverse character font is really strange, because of 
the 8th byte (See technicl notes above). After making your selec- 
tion the disk drive will whir into action and the display will show 
(in standard video characters) the font characters that are being 
converted. When this loading/converting process is done you will 
be asked to choose whether to send the font data directly to the 
[P]rmter or the [D]iskfor later use. Sending the font to the disk will 
not load the font into the printer. You will use the [L]oad option to 
load the font from the disk to the printer. 

When saving the font to the disk you will be offered the oppor- 
tunity to create a text file for conversion to Apple ][ mode. Convert- 
ing the Apple ///text file to Apple] [text as well as moving it to an 
Apple ][ disk is easy, that is if you own a text transfer program like 
the utility disk which comes with Apple Writer ///.This utility disk 
when booted will offer you several choices for file conversion #2 
of which is Apple /// files to Apple ][ files. This program works 
best with multiple disk drives. It's best to use drive 1 for your 
Apple ] [ Dos 3.3 formatted disk. To convert the font textfi le created 
with the pascal program select #2. Then answer the Apple /// 
volume question with the proper drive # (and subdirectory path, 
if any). The program will then ask for filenames. When answering 
these two questions remember the file naming rules for each type 
of file. When in doubt use the Apple /// filename for both. Then 
you will be instructed to place the proper diskettes into their 
proper disk drives (e.g. Apple ][ diskette in Drive #1 and Apple 
/// formatted disk in drive #2). Once moved to an Apple ][ disk 
the process of loading the font from the disk to the printer is a 
simple one. Just enter and run the Applesoft program in this article. 

Once the new custom font is loaded into the printer it can be 
tested with either program. The program will print for you the 
complete character set followed by a message you can enter. 
Great uh? Well almost . . . there is one drawback. Only one com- 
plete custom character set can be held by the printer at one time. 
The custom font will remain intact until the printer is turned off or a 
new custom font downloaded. Run the program listed then try 
Apple Writer. To turn on the new custom font print<ESC> '. To turn 
it off print<ESC>$. If you are using Apple Writer you will need to 
use <CTRL> V to imbed the <ESC> character in your text. 

Now Byte, Apple, Roman, Gothic, Slant, Stop and Inverse char- 
acter fonts can be printed on the Apple Dot Matrix Printer. Now it's 
time to byte into the long awaited SOS manuals! Documentation at 
last! 'Happy Bit Byteing' /// 

Apple ][ Special Notes 

Note # 1 : If you are using a Prowriter instead of an Apple DMP and 
your printer will not accept the custom font, you will need the 
addition of a 2K x 8 Bit Static Ram (TMM 201 6). Early versions of the 
Prowriter were shipped without this chip, and supporting docu- 
mentation for the custom font feature. This chip, about the size of a 
common ROM, is placed in the only empty socket on the main 
board inside your Prowriter. I suggest that you have your computer 
dealer handle this process, unless you're very good insmall places. 



Apple ][ and Apple ///. Many printer cards installed in Apple ][s 
did not support 8 bit data transfer. 

[ILLUSTRATION] 

Printer "<list>" Data Format: 

Prior to loading Select Font Mode (hAax Size). 
Send one of the following Codes to the printer: 

[ESC] - Selects 1 to 8 bit character width. 
Total of 175 possible characters. 

(dec) ASCII 32-126 
ASCII 160-239 

[ESC] + Selects 1 to 16 bit character width 
Total of 95 possible characters. 

(dec) ASCII 32-126 

Character Definition <List> Format: 

Precede with [ESC] I 

Loop Until Finished Transferring All Characters 

> 

1 Byte = ASCII Code 

1 Byte = Length Code 

n Bytes = Char Data (n = Width of Character) 
<- 



Length Code = Width of Character (1..16) + 
32 if Descender Exists. 

If Decender Exists printer uses Lower 8 wires instead of upper 8. 

After The Last Character Has Been Sent Print ASCII 4 (Chr (4)) To 
Indicate Completion of Transfer. 

CharDownLoad: Program Listin g 

PRQ6RAH Font.Mover; 

t „ — 



Copyright 1983 by 
ON THREE 
April-Hay, 1983 



* Char Download 

* 

* by Tiiothy S. Sixth 
t 
t 

* Thii prograe Mill download thi Applt ///'i screen font to an Applt 

* Dot Matrix Printer or Prowriter. Files lay be saved and then later 

* ritrieved for downloading. 
t 

* Read the article for coiplete information on how to uie the prograe. 

ttfttt«t«44ff««t«f*#ft«ift«ttt4ttt«fff**f«4«tt«tfft««tt#«f#«ft#t«f« M t H «t«« 

VAR CH: PACKED ARRAY CO.. 127, 0..7, 0..7] OF 0..1; 
CR, Coluen, Row, 
Count, Tetp : IHTEBERf 
Response : CHAR; 
Printer : INTERACTIVE! 



Note # 2: The Applesoft prosram in this article is desisned to 
work with the latest edition of Apple Parallel Interface Cards for the 



PROCEDURE Send; 
VAR Bits: CHAR; 



{ Send Font bytes to printer froe eatrix } 
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BEGIN 
{IIOCHECK-} 
RESET (Printer, 

April/May 1983 



.PRINTER'); 



ON THREE 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// /// 



/// /// /// /// 



/// 



WtlTE (CHR 128)); 
IF IORESULT <> THEN 
BEGIN 
GOTOXY (24. 10); 

WRITELN ('Printer Not Available'); 
EXIT (Prograi) 
End; 
GOTOXY (25. 10); 

WRITELN ('Downloading Font to Printer'); 
WRITE (Printer. CHR (27), '-', CHR (27), T){ 
FOR CR := 32 TO 126 DO 
BE6IN 
6QT0XY (40, 12)5 
WRITE (CHR (CR)); 

WRITE (Printer, CHR (CR), CHR (8)){ 
FOR Coluin :* b TO 7 DO 
BEGIN 
Count :« l; Teip I* 0; 
FOR Row :-0 TO 7 DO 
BEGIN 
Teip :» Teip ♦ <CH [CR, Row, Coluin] * Count); 
Count :» Count * 2 
END; 
Bits l« CHR (Teip); 
UNITNRITE (6, Bits, 1, 0, 12) 
END; 
END; 
WRITE (Printer, CHR (4)); 
CLOSE (Printer) 
<$IQCHECK+> 
END; ( of PROCEDURE Send ) 

PROCEDURE Save; { Save Font bytes to disk file (In Printer Fortat) > 
VAR FileNaie: STRING; 

FontFile: PACKED FILE OF 0..255; 

Two :TEXT; 

Teip, Count: INTE6ER; 

Bits :char; 

ApplcII BOOLEAN; 

BE61N 
WRITE (CHR (28)); 
GOTOXY (0, 10)} 

WRITE ('Enter File Pathnate For Saving :'); 
READLN (FileNaie); 
GOTOXY (0. 10); 

WRITE (CHR (30), 'Save in Apple ][ Text Fornt (Y/N) ? '); 
REPEAT 

READ (KEYBOARD, Bits); 
UNTIL (Bits = V) OR (Bits = 'YM OR (Bits = 'n') or (Bits ■ 'N')J 
IF (Bits » 'y') OR (Bits « 'Y') 

THEN Appletl :» True 
ELSE 

Applell :• False; 
WRITE (CHR (28)); 
(IIOCHECK-) 
IF Applell THEN 
BEoIN 
REWRITE (Two, FileNaie); 
IF IORESULT <> THEN 
BEGIN 
60T0XY (24, 10); 

WRITELN ('Unable To Open File'); 
EXIT (Prograi) 
END; 
END 
ELSE 
BE6IN 
REWRITE (FontFile, FileNaie); 
IF IORESULT <> THEN 
BEGIN 
GOTOXY (24, 10); 

WRITELN ('Unable To Open File'); 
EXIT (Prograi) 
END 
END; 
WRITE (CHR (28))J 
60T0XY (35. 10)J 
WRITELN ('Saving Font'); 
IF Applell THEN 
BEGIN 
GOTOXY (28. 11); 

WRITELN ('In Apple // Text Foriat') 
END; 
FOR CR :» 32 TO 127 DO 
BE6IN 
GOTOXY (40, 12)J 
WRITE (CHR (CR)); 
FOR Coluin :» TO 7 DO 
BEGIN 
Count :« l; 

Teip :* o; 

FOR Row :» TO 7 DO 
BE6IN 
Teip :» Teip + (CH [CR, Row, Coluin] ♦ Count); 
Count := Count * 2 
END; 

{ If Saving for Transfer to Apple ][ Save in Text } 
{ Not Byte Foriat } 

IF Applell THEN 
BEGIN 
STR (Teip, FileNaie); 



WRITELN (Two, FileNaie) 
END 
ELSE 
BEGIN 
FontFile* :* Teipt 
PUT (FontFile) 
END 
END 
END; 

CLOSE (Two, Unprotect); 
CLOSE (FontFile, Unprotect); 
{II0CHECK+} 

WRITE (CHR (28)) 
END; { of PROCEDURE Save } 

PROCEDURE Load; { Load Previously Converted Font file } 
{ froi disk and send it to the printer. } 

Var FileNaie .'STRING; 

FontFile :PACKED FILE OF 0..2S5I 
CH '.CHAR; 
Count, Teip : INTEGER; 

BE6IN 
WRITE (CHR (28)); 
60T0XY (0, 10)} 

WRITE ('Enter Printer Character File Path :')$ 
READLN (FileNaie); 
WRITE (CHR (28)); 
GOTOXY (30, 10)J 

( Open File And Printer Device } 

(IIOCHECK-) 
RESET (FontFile. FileNaie); 
IF IORESULT <> THEN 
BEGIN 
WRITELN ('File Not Found'); 
EXIT (Prograi) 
END; 
RESET (Printer, '.PRINTER'); 
IF IORESULT <> THEN 
BEGIN 
WRITELN ('Printer Not Available'); 
EXIT (Prograi) 
END; 

< Hove Font Froi Disk } 

60T0XY (29, 10){ 

WRITELN ('Moving Character Font'); 
WRITE (Printer, CHR (27), '-', CHR (27), 'I')} 
FOR CR :»32 TO 127 DO 
BEGIN 
60T0XY (40, 12); 
WRITE (CHR (CR)){ 

WRITE (Printer. CHR (CR), CHR (8)); 
FOR Count: «0 TO 7 DO 
BE6IN 
CH:«CHR (FontFile A ); 
UNITWRITE (6, CH, 1, 0, 12); 
6ET (FontFile) 
END 
END; 
WRITE (Printer, CHR (4)); 
CLOSE (Printer); 
CLOSE (FontFile) 
<$I0Check+} 
END; ( of PROCEDURE Load } 

PROCEDURE Test; { Tut Cuitoi Character Font } 

VAR Count: INTEGER; 
Hessage: STRING; 

BEGIN 
WRITE (CHR (28)){ 
60T0XY (0, 10); 

WRITE ('Enter Test Hessage Line :')} 
READLN (Hessage); 
WRITE (CHR (28)); 
60T0XY (36. 10); 
WRITELN ('Testing'); 
RESET (Printer, '.Printer')} 
IF IORESULT <> THEN 
BEGIN 
WRITE (CHR (28)); 
60T0XY (20. 10); 

WRITELN ('Printer Not Available')} 
EXIT (Prograi) 
END; 
WRITELN (Printer, CHR (27), CHR (39)); 
FOR Count :»32 TO 126 DO 
BE6IN 
WRITE (Printer, CHR (Count)); 
IF Count = 79 THEN 
WRITELN (Printer) 
END; 
WRITELN (Printer); 



WRITELN (Printer, Hessage); 
WRITELN (Print! 
CLOSE (Printer! 



age); 
(27), 



CHR (36)); 



April/May 1983 



END} { of PROCEDURE Test } 

Program listing continued on next page. 
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ON THREE 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// 



/// /// 



/// 



/// 



/// 



/// 



PROCEDURE Read Font; { Read Apple /// Fontfile Froe Disk And } 
{ Convert TO Bit Hatrix Table CH. } 
VAR FontFile: FILE} 

( Untyped File FOR Blockread Function } 
FilePath: STRING) 

{ SOS File Path - Catalog Path I File Naee } 
Inverse: BOOLEAN; 

{ Flag TO Set Character Font TO Inverse Node } 
Buf: PACKED ARRAY CO.. 40953 OF 0..1} 

( Input Buffer As Array of Bits } 
BEGIN 
WRITE (CHR (28))j 
6QT0XY (0, 10); 

WRITE ('Enter Font File Pathnaee :'); 
READLN (FilePath); 
SOTOXY (0.10); 

WRITE (CHR <30),'Enter As [Hnverse or CNJoreal ?'){ 
REPEAT 

READ (KEYBOARD, Response); 
UNTIL (Response = T) OR (Response »'i') OR 

(Response ■ 'n') OR (Response « 'N'); 
IF (Response - T) OR (Response * 'i') THEN 

Inverse := True 
ELSE 

Inverse J» False; 
WRITE (CHR (28)); 
SOTOXY (32. 10); 
WRITELN ('Opening Font File'); 

{ Open Fontfile On Disk ) 

{II0CHECK-} 
RESET (FontFile. FilePath); 
IF IORESULT <> THEN 
BEGIN 
60T0XY (28. 10); 

WRITELN (CHR (30), 'Unable TO Open Font File'); 
EXIT (Prograe) 
END; 
{II0CHECK+} 

{ Read and Load File TO Hatrix ) 

WRITE (CHR (28)); 
BOTOXY (29, 10)J 

WRITELN ('Converting Font Table')? 
Teep :* BLOCKREAD (FontFile, Buf, 1); 
FOR CR:=0 TO A3 DO 
BE61N 
SOTOXY (40, 12); 
IF CR > 31 THEN 

WRITE (CHR (CR)) 
ELSE 
IF (CR HOD 2) • THEN 

WRITE ('#') 
ELSE 
WRITE (' '); 
FOR Ron := TO 7 DO 
FOR Coluen:*0 TO 7 DO 
Ch [CR, Rom, Coluen] :* Buf [CR * 64 + Row * 8 * Colutn] 
END; 
Teep :- BLOCKREAD (FontFile, Buf, 1); 
FOR CR:«64 TO 127 DO 
BE6IN 
SOTOXY (40, 12)J 
WRITE (CHR (CR))} 
FOR Ron:*0 TO 7 DO 
FOR Coluen:»0 TO 7 DO 
Ch ICR, Ron, Colum] :• Buf [(CR - 64) * 64 ♦ Row # 8 ♦ Coluen] 
END; 
CLOSE (FontFile); 

{ IF Inverse THEN Reverse Hatrix > 

IF Inverse THEN 
BE6IN 
WRITE (CHR (28)); 
60T0XY (31. 10)J 

WRITELN ('Changing TO Inverse' ){ 
FOR CR:=32 TO 127 DO 
BE6IN 
6OT0XY (40, 12); 
IF (CR Nod 2 • 0) AND (CR < 32) THEN 

WRITE ('#') 
ELSE 

WRITE (' '); 
IF CR > 31 THEN 

WRITE (CHR (CR)); 
FOR Ro*:«0 TO 7 DO 
FOR Coluen:»0 TO 7 DO 
IF CH [CR, Ron, Coluen] -1 THEN 

CH [CR, Ron, Coluen] :* 
ELSE 
CH [CR, Ron, Coluen]:»l 
END 
END 
END; { of PROCEDURE Read.Font } 

BE6IN ( Ham Prograe } 
WRITE (CHR (28))J 
BOTOXY (15. 0); 

WRITELN ('Character Font Transfer * * # By Tieothy S. Seith')} 
SOTOXY (0. 2); 
HRITE (CHft (2))J 
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SOTOXY (27, 23)} 

WRITE ('COPYRIGHT 1983 by ON THREE')} 

GOTOXY (0. 10); 

WRITE ('[Convert Screen Font OR CL]oad Printer Font Froe Disk ?'); 

REPEAT 

READ (KEYBOARD, Response); 
UNTIL (Response «= 'c') OR (Response * 'O OR 
(Response * '1') OR (Response * 'I') OR 
(Response = CHR (27)); 
IF Response « CHR (27) THEN 

EXIT (Prograe); 
IF (Response * T) OR (Response « 'L') THEN 

Load 
ELSE 
BEGIN 
Read Font; 
WRITE (CHR (28)); 
GOTOXY (0, 10)J 

WRITELN ('Type [Escape] to quit')} 
WRITELN; 

WRITE ('Send Font TO [Pointer OR CDhik ?'); 
READ (KEYBOARD. Response); 
IF Response « CHR (27) THEN 

EXIT (Prograe); 
IF (Response » 'd') OR (Response ' 'DM THEN 
BEGIN 
Save; 

EXIT (Prograe) 
END 
ELSE 
Send 
END; 
WRITE (CHR (28)); 
60T0XY (0, 10); 
WRITE ('Test Font (Y/N) ?'); 
REPEAT 

READ (KEYBOARD, Response); 
UNTIL (Response » 'y') OR (Response « 'YM OR 

(Response = 'n') OR (Response = 'N'); 
IF (Response*' YM OR (Response«'y') THEN 

Test; 
WRITE (CHR (28)) 
END. { Of PROGRAM Font.Hover > 

Apple ][ CharDownLoad 
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APPLE DHP CUSTOM 
CHARACTER FONT LOADER 

BY TIHOTHY S. SHITH 

COPYRIGHT 1983 BY 
ON THREE 
APRIL-HAY, 1983 

l: REM ««■ PRINTER SLOT t 



REM 

REM 
REM 
REM 
REM 
REN 
REM 
REM 
REM 
SL • 

REM 

TEXTlHOME :D$ « CHR* (4): PRINT DI'NQNQN" 

HTAB 12: PRINT •CUSTOM FONT LOADER' 

VTAB 22: HTAB 12: PRINT 'BY TIHOTHY SMITH' 

HTAB 7: PRINT 'COPYRIGHT 1983 BY ON THREE": VTAB 11: PRINT 

DIM A(768) 

INPUT 'ENTER FONT FILENAME: ";F* 

IF F$ « " OR F$ ■ ■?■ THEN HOME: PRINT D$ B CATAL06": PRINT: GOTO 170 

HOWE 

REM 

REM 

REM' 

REM 

PRINT Dl'OPEN "F$ 

PRINT Df'READ 'Fl 

FOR C - TO 767 

INPUT A(C) 

VTAB 12: PRINT "READING ■> "} 
T * INT ((C / 8) ♦ 32): IF T > 96 THEN T « T - 64: INVERSE 

PRINT CHR* (T): NORMAL 

NEXT C 

PRINT DfCLOSE "Fl 

REN 

REM ## SEND FONT TO PRINTER #* 

REM 

HOME: VTAB 12: HTAB 17: FLASH: PRINT 'WORKING"}: NORMAL 
P * (49280 ♦ (SL * 16)): REM <» DATA OUTPUT 

(SL # 256): REM <■ DATA READY STROBE 



« READ FILE OF INTE6ER ** 
** BYTE VALUES FOR FONT t# 



DR « 49345 
REM 



REM PRECEDE FONT WITH 
REM PRINTER MODE AND 
REM ATTENTION CODES... 
REM 

POKE P,24: POKE DR, 1 
POKE P,27: POKE DR,1 
POKE P,45: POKE DR, 1 
POKE P,27: POKE DR, 1 
POKE P,73: POKE DR,1 
REM 

SEND FONT DESCRIPTION 

BYTES PRECEDED BY 

1 BYTE * ASCII VALUE 

I BYTE = LEN6TH OF DESCRIPTION 

N BYTES * FONT DESCRIPTION 



April/May 1983 



REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 



POKE BYTES TO PRINTER 

CARD TO AVOID CONFLICT WITH 

Program listing continued on page 23 
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/// /// 



/// 



/// 



/// 



/// 



/// 



/// /// /// /// /// /// 



/// 



Assembling (ON) the /// 



by Martin Nichols 



Just as promised, this month I will show you how to do some 
more fascinating things with your ///. Since they sxz just a 
random collection of things I have been working on I have called 
these assembly language routines 'Misc.'. 

With this module you will be able to lock and unlock the reset 
key so that a user program can prevent the computer from being 
rebooted, just like Visicalc and Apple Writer///. You will also be 
able to reboot the system without having to press CONTROL- 
RESET. 

The last two procedures in this module allow you to selectively 
choose the speed of the microprocessor that the Apple/// uses. 
You can choose either Slow or Fast and the computer will then 
operate at either 1 or 2 MhZ. You can use this to 'Slow-Up' those 
fast listings and cataloges. Like I said last time, this one is for those 
of you who feel that life is going by too fast. 

Many of you can probably see the use of locking and unlocking 
the RESET key, and possibly even changing the speed to slow 
things down. But why the heck do we need this reboot thing 7 Well, 
I wrote this one because a few buffered printer interface cards 
loose their buffer when you press CONTROL-RESET. 

Say you are printing out a very long listing of a Basic program to 
your buffered printer. The computer sends the listing to the buffer 
and the buffer sends it to the printer as fast as the printer can 
accept it. The listing to the buffer takes only a few seconds and 
now you want to write a letter so you insertaword processing disk 
and press CONTROL-RESET. Bam!! The listing that was in the buffer 
seems to have been erased and you get half a print-out or less. 

With this module you can do a reboot without destroying 
information in your print buffer. Program listings # 1 and # 2 show 
how easy it is to do this from both Basic and Pascal. The assembly 
language procedures are listed in program listing # 3. The docu- 
mentation and test programs combined into one and dre listed in 
program listing # 4. 

To use these routines in your programs, use the Pascal editor to 
enter the assembly language routi nes in listing # 3. Assemble it and 
name if 'MISC. The file that the assembler creates will contain the 
useable assembly language procedures, and its name will be 
'MISC. CODE'. To show that this can be used as an invokable 
module, use the filer to change its name to 'MISC.INV. 

Program listing # 1 is a Pascal Program to show you how easy it is 
to reboot. Listing # 2 is the Basic implementation. You can use 
these routines just as they are described in the Basic Documenta- 
tion and Test program. If you want to use them in Pascal, declare 
each of the routines external procedures and use the Linker to link 
them into your Pascal host program. 

That's all for now, next time I will answer many readers questions 
by showing how to format a diskette outside of the System Utilities 
Disk. Basic and Pascal implementations will be given. Now ANY 
program can give the user the option of formatti ng a diskette! /// 

Assembling (ON) the ///: 

Program Listing #1 

PR06RAH Boot; 



{ * Ri-Boot (Pascal version) 

{ * 

{ t by Hartin Nichols 

{ * 

{ * 

{ * 

( * 

{ * 

{ * 
i 



Copyright 1983 by 
ON THREE 



This program deeonstrates ho* to use the 'HISC asmbly 
language routine ReBoot from within your Pascal programs, 

Alter compiling this prograi, use the L) inker to link 
the assembly language routine to this Pascal prograi. 



CONST Return ■ 13} 
Escape « 27; 

CI tar .viewport ■ 28| 

VAR Response: CHAR; 

Esc.Ret : SET OF CHAR; 

PROCEDURE ReBoot; { * Here is the routine that allows you to t ) 
EXTERNALS { t reboot without pressing CONTROL-RESET. # > 

BEBIN { Main of Boot } 

Response :■ ' 'I 

Esc Ret :- [CHR (Escape), CHR (Return)]; 

KRITE (CHR (Clear viewport)); 

SOTOXY (12, 12)J " 

WRITE ('Press 'RETURN" to re-boot the systee, '){ 

MITE ("ESCAPE' to eiitMj 

REPEAT 
UNITREAO (2,Response,l,,12) 

UNTIL (Response IN Esc Ret); 

IF (Response * CHR (Return)) THEN 
Reboot 
END. { Of PR06RAH Boot > 

Assembling (ON) the ///: 
Program Listing #2 



{ t Read one character t } 
{ # froe the keyboard. * ) 



REM twtemttwttt+mmfttwmea+faws+etssisisiiisiSiisses 

REN * Re-Boot (Basic version) 

I Copyright 1983 by 1 

by Hartin Nichols ION THREE! 



REN t 
REN t 
REN * 

REN t 
REN t 



This prograe demonstrates how to use the 'HISC' invokable 
eodule froe Basic. Any tiee you want to re-boot your 

REN » systee without pressing CONTROL-RESET, you can! 

REN * 

REN t*m#m***#t#*ttwwt*Mtm##wtwm##t###*wt*w#* 

teit:hohe:vpos«12 

ON ERR PRINT'Can't find the invokable I !!":ENB 

INVOKED sc.INV: OFF ERR 

Esc.Rett>CHR!<27>+CHft!U3) 

PRINT U8IN8 a 80cM B Press 'RETURN' to re-boot, 'ESCAPE' to exit' 

8ET Response! 

IF NOT INSTR(Esc.Ret$,Response$) SOTO 60 

IF Responssf-CHRf (13) THEN PERFORN ReBoot 

HONE 



Assembling (ON) the ///: 
Program Listing #3 



mtt»mww«wfi H MH*H«t u »»«»i*wifrM mM iiiii m ii m 
i 

t Nisc. Utilities: SpeedBoot(Un)Lock? 



by Hartin Nichols 



! Copyright 1983 by I 
I ON THREE I 
I April-Hay, 198* ! 



These asseebly lanuage routines will enable your Basic or 
Pascal prograes to re-boot the systee without pressing 
Control -Reset, Lock and Unlock the Reset key to protect 
froe accidental reboots, and slow down and speed up the 
speed of the computer. 

To use in your Basic proqraes, assemble these routines using 
the Pascal assembler, and then invoke it as you would any 
other invokable eodule. 

For use in Pascal prograes, declare each of these routines 
EXTERNAL PROCEDURES and then use the linker to link thee to 
your Pascal host prograe. 



»MtmwwwwiMtmtMMt+Htttm*»imm mwm t»mt 



.MACRO Set 

IDA Ul 

ORA Z2 

STA 12 
.ENDN 

•MACRO Reset 

LDA «r«isk 

AND Z2 

STA 12 
.ENOH 

.MACRO SOS 

BRK 

.BYTE XI 

.NORD 12 
.ENDH 



Close .EOU OCC 

Mask .EBU OFF 

Envret .EBU OFFDF 

Boot .EBU 0F4EE 



; This sets specific bits within 

; a byte to 1. 

( Use like this -> Set IBO.High 

; This will set the high bit (17) 

; of the byte High to I. 

I This sets specific bits within 

; a byte to 0, 

; Use like this -> Reset §80.Low 

; This will set the high bit (17) 

{ of the byte Low to 0. 

; Nacro def for SOS call block 

; Benin SOS call block 

; call nue 

; paraieter list painter 

; end of eacro definition 



; call nue for CLOSE 

; Used'to EOR a byte in Reset above 

; Environment register location 

; Monitor entry point for booting 



- Procedure ReBoot 



; This procedure causes the systee to reboot. Before rebooting, 
; it first closes all open files whose file level is greater than or 



{ t*m«#t*##t####t#ftt*t*«t#««mttm#at**4##*#m#t#ttt« } April /May 1983 pr °9'om listing continued on next page. 
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/// 



/// /// 



/// 



/// 



/// 



/// 



/// 



/// /// 



/// 



/// 



/// 



/// 



; equal to the current systei level. Hake sure you have finished 
! writing to any open file before using this call, as it doesn't 
I return. 

; 

.PROC Reboot, 
JHP Start 



C List 
C"Ref 



Start 



.BYTE 
.BYTE 



SOS 
LDA 
STA 
JNP 



01 $ one parameter for CLOSE 

00 ; close all files that are 

; >* the current file level 

Close, C_List ; Close all open files. 

173 ; Do this to take sure we are not 

Envrit i qoino to juip off into oblivion. 

Boot ; No RTS because Me won't be 

! coiing back to the systei. 

- Procedure ResetLock - 



I 
I 

; This procedure locks out the Reset key so you can't reboot by 
I pressing CONTROL-RESET. You can use this to idiot-proof your 
proo/ais froi accidental rebooting. 



I 



.PROC Reset. Lock, 

Reset 110, Envrit 
RTS 



- Procedure ResetlinLock - 



i This procedure unlocks the Reset key so you can reboot by 
; pressing CONTROL-RESET. Use this just before exiting your 
; programs that use the procedure ResetLock above. 



.PROC Reset .Unlock, 

tlO, Envrit 



Set 
RTS 



Procedure Slow - 



} This procedure cuts the speed of the Apple ///'s 6502 CPU froi 

; a laxitui of 2HhZ to INhZ. This change lasts until the next 

; tiie you reboot, or until you use the Fast procedure below. 

I Useful for slowing down things that are going to fast for you 

' such as prograi listings and other quick operations. 



.PROC Slow,0 



Set 
RTS 



•80, Envrit 



- Procedure Fast - 



I 



} 

) 

; This procedure sets the speed of the Apple ///'s 6502 CPU to 

; be 2ml regardless of what it was. Use this to speed back up 

I the coiputer after using the Slow procedure above. 

; 

.PROC Fast,0 

Reset 180, Envrit 
RTS 

.END } Of asseioly 

Assembling (ON) the ///: 
Program Listing #4 
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230 

240 

250 
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REN 

REN 
REN 
REN 
REN 
REN 
REN 
REN 
REN 



t Nisc. Utilities.' Documentation and 
Test Prograi 
by Nartin Nichols 



Copyright 1983 by 
ON THREE 
April-Nay, 1983 



This prograi demonstrates how to use the 'NISC" invokable 
■odule froi Business Basic. 



REN t You can now have the coiputer Re-Boot, Lock and Unlock the 
REN * RESET key, and slow down and speed up the licroprocessor 
REN * froi Basic using siiole coiiands. 



REN 
REN 
REN 
REN 

REN 



To use in your Basic prograis, invoke it into leiory with 
the statement 'INVOKE 'NISCINV' and then use the routines 
as they are outlined below. 



REN Mm*t*Wt##«t#tt#**W«##m**W#**#«****#WMMM*#«**W* 

INVQKE'Nisc.INV:REH Load the Invokable Nodule 

Screen. 0ff««CHRI(14):TEn 

Titlef'Screen.Offt+'NISC INVOKABLE NODULE Documentation k Test" 

S0SUB 510IVP0SM 

PRINT'Before and Invokable Nodule can be used, it lust be loaded"; 

PRINT" into the systei by the following Gotland Foriaf." 

PRINT:PRINT") INVOKE NISC.INV":PRlNT:PRINT'where NISCINV can be the"} 

PRINT' naie of this or any other Invokable Nodule.": PRINT: 60SUB 500 



290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

500 

510 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1099 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

3000 

3010 

3020 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 

4000 

4010 

4020 

4030 

4040 

4050 

4060 

4070 

4080 

4090 

4100 

4110 

4120 

5000 

5010 

5020 

5030 

5040 

5050 

5060 

5070 

5080 

5090 

5100 

5110 



Title**Screen.Qff$+'HISC INVOKABLE NODULE Docutentation k Test" 

60SUB 510:VP0S»4 

PRINTlPRINT TAB(8)|"Select one of the following options: ":PRINT 



PRINT TAB(10)}"1. 
PRINT TAB(10),*"2. 
PRINT TAB(10)|"3. 
PRINT TAB(10)|"4. 
PRINT TAB(10)|"5. 



Rebooting the systei" 
Locking the RESET key" 
Unlockmo the RESET key" 
Slowing down the coiputer" 



Speeding up the coiputer* 
PRINT TAB(10)}"6. End":PRINT 



5 : INPUT a*:x«CQNV(LEFT$(al,2)) 



5 or 6":VP0S» VPOS-2:60T0 380 



PRINT TAB(8)J"«hich option 

IF x<0 THEN x-0 

ON x SOTO 1000.2000,3000,4000,5000,420 

PRINT TAB (8); "Please enter 1, 2, 3, 4, 

H0HE.'PRINT'Bye!":PRINT:END 

VP0S*24:PRINT USIN6"76c"| 'Press any key to Continue"; :6ET a$:RETURN 

H0ME:PRINT USIN6"79c";Title$:PRINT:RETURN 

REN — Reboot the systei — 

Title$«Screen.0ffl+'- Reboot -":S0SUB 510 

VP0S«4:PRINT"This procedure causes the systei to reboot. Before "J 

PRINT'rebooting, it first closes all open files. To use, insert"; 

PRINT" a boot disk (Pascal, Apple Writer ///, etc.) into the "J 

PRINT'internal disk drive and issue the following stateient: ":PRINT 

PRINT")PERFQRM Reboof:PRINT 

PRINT'and the systei will reboot.": PRINT 

PRINT'To actually use, exit this prograi and enter the above *; 

PRINT'stateient to reboot." 

60SUB 500:60T0 290 

REN — Lock the RESET key — 

Title$«Screen.0ff$+"~ Locking the RESET key -":S0SUB 510 

VP0S«4:PRINT"Thi5 procedure locks out the RESET key so you can't "} 

PRINTVeboot by pressing CONTROL-RESET. You can add this"; 

PRINT" to your prograis as a nthod of protection against"; 

PRINT" accidental rebooting. ":PRINT 

PRINT'To use. enter the following stateitnt:":PRINT 

PRINT') PERFORM ResetLock':PRINT 

PERFORM ResetLock 

PRINT'we have just locked out the RESET key. To test it out, "J 

PRINT"try to reboot the systei by pressing CONTROL-RESET." 

PRINT:PRINT'When you are convinced that you can't reboot..." 

bosub 500:vpos»i6:print 

PRINT'See, I told you so..." 

S0SUB 500:60T0 290 

REN — UnLock the RESET key — 

Title«-Screen.0ff$+"-- UnLocking the RESET key -":60SUB 510 

VP0SM:PRINT"This procedure unlocks the RESET key so you can "; 

PRINTVeboot by pressing CONTRQL-RESETYou can add this to"; 

PRINT" your prograis as a leans of reversing the protection"; 

PRINT" given by the ResetLock stateient.": PRINT 

PRINT'To use. enter the following stateient: ':PRINT 

PRINDPERFOftH ResetUnLock': PRINT 

PERF0RH ResetUnLock 

PRINT'we have just unlocked the RESET key. Take ly word for it, '5 

PRINT'if you try to test itby pressing CONTROL-RESET you will "; 

PRINTVeboot the systei." 

60SUB 500:60T0 290 

REN — Slow up the /// — 

Title$«Screen.0ff$+'~ Slowing down the Apple /// ~":60SUB 510 

VP0S»4:PRlNT"This procedure cuts the speed of the Apple ///'s "; 

PRINT'6502 CPU froi a taxiiui of 2Mh2to INhZ. This change lasts"; 

PRINT' until the next tiie you reboot, or until you use theFast "{ 

PRINT'procedure included in this invokable iodule.":PRINT 

PRINT'To use. enter the following stateient:': PRINT 

PRINDPERFQRN Slow':PRINT 

PERFORM Slow 

PRINT'we have just slowed down the licroprocessor. Everything '{ 

PRINT'should appear slower now. All operations will take about"} 

PRINT' 501 wore tiie to coiplete." 

60SUB 500: SOTO 290 

REN — Speed up the /// — 

Title*«Screen.0ff$+'- Speeding up the Apple /// -':60SUB 510 

VPQS=4:PRINT"This procedure sets the speed of the Apple Ill's "; 

PRINT'6502 CPU to a laxiiui of 2HhZ froi INhZ. This change lasts'} 

PRINT' until the next tiie you reboot, or until you use the '; 

PRINT'Slow procedure included in this invokable iodule.":PRINT 

PRINT'To use, enter the following stateient: ":PRINT 

PRINDPERFORM FasflPRINT 

PERFORM Fast 

PRINT'Ne have just speeded up the licroprocessor. Everything "; 

PRINT'should appear faster now. All operation should be at"; 

PRINT' nonal speed.' 

S0SUB 500:60T0 290 



5120 

DOS File List 



Continued . 



BE6IN { NAIN of List DOS Directory } 
Set Out device; 
Line count := 4; 
Mith'DosdirtOl DO 
BEGIN 
Dfkind := Volinfo? 
Dnuientries :* 0; 
Dunitnui :*0 
END; 
Catalog} 
{II0CHECK- } 

CLOSE (Device, LOCK); 
{II0CHECK+ } 

Trap 10 error 
END} fOf'PROCEDURE Li st.D0S.Di rectory } 
BE6IN 
{ This is the initialization, which occurs } 
{ before the host prograi is executed. } 
END. { Of UNIT DOS List Stuff } 
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Products Received 



The products outlined below have been received by ON THREE 
for the purpose of review. Some have been reviewed in the 
past and many will be reviewed in the future. The products have 
all been siven the ON THREE 'stamp of approval'. This is only an 
indication that a product works as advertised and is not an 
endorsement of the product by ON THREE. 

PFS: FILE & REPORT 

With PFS: File you can create a file, search and update any item or 
group of items in the file, and print sorted information. Information 
management at its best, these programs are extremely easy to use. 

All PFS products are designed so that a novice can master them 
in less than an hour. Reviewed in the January issue of ON THREE, 
these programs received an A- and a B- respectively. 

Available from most authorized Apple dealers, these programs 
are made by Software Publishing Corporation and are priced at 
$175 and $125 respectively, for the Apple ///. 

Software Publishing Corporation, 1901 Landings Drive, Mountain 
View, California 94043. (415) 962-8910. 

QUICK & EASY DATA MASTER 

Quick & Easy Data Master is a program that creates custom 
applications software and report forms designed to your specifi- 
cations. This package creates an unprotected Business Basic data 
base program as per your specifications. 

The ideal data base program is one that you can design exactly 
the way you want it: prompts, edits, error messages, headers, titles, 
computed data, interactive files, report forms, etc. to your specifi- 
cations. You design it and Quick & Easy will create it for you. 

Intended for the more serious computer user who knows how 
to program in Basic, this package is not very hard to use, but it does 
require some thought. Sold by Advanced Software Technology, 
Inc., it is priced at $69.95. Reviewed in this issue, it gets a C. 

Advanced Software Technology, Inc., 7899Mastin Drive, Overland 
Park, Kansas 66204. (913) 648-4442. 

CRITICAL PATH SCHEDULING 

If you are involved in project management and tired of the 
hassels of project scheduling, the Critical Path Scheduling System 
is for you! It is a management tool for defining and analyzing the 
overall conceptsof a projectand providesa powerful method for 
scheduling the many tasks necessary to complete the project ON 
TIME AT THE LOWEST POSSIBLE COST. 

Armed with the information that this system provides, the man- 
ager is better prepared to make decisions regarding the impact any 
task will have on the project and permits him to be instrumental in 
guiding the project rather than just monitoring its progress. 

This is a very 'User Friendly' system, and it has a good tutorial/ 
user manual. Comprehensive reports make a manager's life a lot 
easier. Developed by Great Divide Software, it has a suggested 
retail price of $495. Reviewed in this issue, CRITICAL PATH 
SCHEDULING gets a B. 



GL-PLUS 

To many managers, accounting and the preparation of financial 
reports are time consuming chores that have to be struggled 
through. But now, at last, accounting can be simplified. 

GL-PLUS is an accounting system designed for the Apple /// 
computer. It is a flexible, easy to use, journal-based General Ledger 
system. The computer and GL-PLUS combine to provide you with a 
tool. A tool to make your accounting chores easier. GL-PLUS auto- 
matically guides you through entries and then automatically sorts 
and posts them. 

Report preparation is a "snap"with GL-PLUS. You select the 
report you wish and the rest is done automatically. GL-PLUS 
includes a PLUS. The PLUS is a built-in accounts receivable and 
accounts payable capability that can be implemented anytime 
you desire. 

Another 'User Friendly' system, flexible reporting and ease of 
use make an excellent accounting package. Developed by Great 
Divide Software, it has a suggested retail price of $495. To be 
reviewed in the June-July issue. 

Great Divide Software, Inc., 8060 West Woodard Drive, Lakewood, 
Colorado 80227. (303) 337-0383. 

PKASO /// 

The PKASO /// printer interface system is a hardware and 
software device that allows the Apple /// to operate with just 
about any dot matrix printer in both native and emulation mode. It 
gives the user the option of printing text, graphics or even screen 
dumps on your parallel printer. 

A very nice printer interface, the system has a suggested retail 
price of $205. Reviewed in this issue, the PKASO /// printer 
interface gets an A. 

Interactive Structures, Inc., P.O. Box 404, Bala Cynwyd, Pennsylva- 
nia 92123. (215) 667-1713. 

MICROTEK Dumpling-GX & 
Dumpling Spooler & 
Alpine Printer Driver 

The MICROTEK printer interface cards used with the Alpine 
printer driver allow the Apple /// to connect with a variety of 
parallel printers. In particular, the MICROTEK Dumpling Spooler 
interface allows you to dump vast quantities of data into the 
interface buffer for later printing. 

Combined with the Alpine Apple /// interface software, the 
MICROTEK interface cards allow the printing of text, graphics and 
screen dumps on your parallel printer. It even works in emulation 
mode. To be reviewed in the June-July issue. 

MICROTEK, Inc., 9514 Chesapeake Drive, San Diego, California 
92123. (619) 569-0900. Alpine Computing, Inc., 851 North Main, 
Logan, Utah 84321 . (801 ) 752-6432. 

Continued on page 9 
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Word Processing Language 



by Bob Consorti 



■ PL is a fantastic tool for Apple Writer/// users. Unfortunately, 
\XJ very little is known about WPL and what it can do. ON THREE 
will periodically publish WPL prosrams and more importantly, the 
instructions on how to use them. The information in this column 
will serve as an introduction and tutorial to the language, so if you 
have written WPL programs we want to hear from you! 

What is WPL and what can it do 7 Well, as stated in the manual, 
WPL's purpose is to make automated word processing possible. 
Many of the things that you do with word processing such as 
typing in form letters, reports and other repetitive tasks can be 
done easier with WPL. 

Since one of the greatest purposes of computers is to save us 
time, it was inevitable that WPL came to be. Since it can and will 
save you time, it's unfortunate that so little information is available 
for it. 

It all sounds good, right 7 Well, now we will discussjusthowWPL 
can makeyourworka littleeasier. To follow along, you musthavean 
Apple Writer /// Master disk in the internal disk drive and the 
instruction manual (not the Product Training Pak!). 

Type [P] (Control-P), and then 'PD.CONSOLE'. Next type [P] 'DO 
.D1/AUTOLETTER'. We will be printing letters so to not waste 
paper, we will print it on the screen. That's the reason for the first 
line. The next line tells the computer to execute the WPL program 
named 'AUTOLETTER' on the disk in the internal disk drive. 

Your disk drive should come on a number of times and five 
letters will be printed. What is going on is this: The WPL program is 
taking a form letter (from the file '.D1/FORMLETTER') and the names 
and addresses from the file '.D1/ADDRS' and combining the 
information to create form letters. Thus if you have a large number 
of letters with the same general information that needs to be sent 
out, WPL can extract the names, addresses and other pertinent 
information from the address file and automatically print out a 
number of personalized letters. 

How does it do it 7 That's a bit complicated but I think I can 
explain it. A WPL program is a standard Apple Writer/// text file 
that consists mainly of normal Apple Writer/// commands. A WPL 
program thus has all of Apple Writer ///'s search and replace, 
printing and formatting, loading and saving, insertion and deletion, 
etc. commands. For those of you with a little programming exper- 
tise, WPL also offers integer and string variables. Even some simple 
comparison statements and subroutines are available. 

As its name implies, WPL is a true programming language. With it 
you can really automate many of those complicated and tiresome 
chores. The form letter example included on the Apple Writer/// 
program disk is but one of many things possible with WPL. For the 
next few paragraphs, I will discuss the basics of WPL and give you 
examples of simple WPL programs, 

This is going to be an interactive tutorial, so you will have to do a 
little work. Start by opening your instruction manual to page 71 
and start reading. On page 72 you will find something that may 
clarify things a little. If you have ever used embedded text format- 
ting commands when printing out a text file, you have used WPL! 

In other words, if you used the '.CJ' command to center a line of 
text while printing (or any other formatting command) you were 
using WPL. Thus all of the '[P] Print/Program Commands:' options 
die caned out by WPL. On page 72 you will also see how to use 
WPL commands from within a WPL program. 

To automate a process using WPL, all you have to do is write 



down all of the keystrokes you use in that process and convert 
those keystrokes into a WPL program. Commands begin with some 
control character (CONTROL P to print, CONTROL F to find/ 
replace. . .), thus to initiate a command from within a WPL program 
we must somehow tell the computer that we want a command 
processed. 

Using WPL we just enter the CONTROL characters as normal 
letters and follow them with the other necessary keystrokes. So to 
set the left margin using WPL we enter the following statement: 
'PLM 10'. One of the quirks of WPL is that commands have to be 
preceded by one or more spaces. Thus press the TAB key once 
before entering the command 'PLM 10'. 

You should now have 14 characters in your file. Save it to a blank 
disk with the command '[S].D2/TEST.1\ Now that it is saved on a 
diskette you can execute it by typing in '[P]DO .D2/TEST.1 '.This is 
the "DO" command and it is the way to execute a WPL program. 

After pressing RETURN, the "DO" command will execute the 
specified WPL program from disk. In our example, the program 
changed the left margin of the print format to 10. To check this out, 
type '[P] 7 ' to get into the Print/Program Commands: options. The 
left margin option should now be 10. To make sure that it wasn't 1 
to start with, change it to say, 99 with the command 'LM 99'. Now 
press RETURN once to get out of this menu and execute the WPL 
program again with the line '[P]DO .D2/TEST.1 '. Finally, check the 
left margin value and it will be 10. Woila! The WPL program did it. 

Mindless, huh? Well, say you had one hundred letters to be 
printed, each with a different left margin. It would be a heck of a 
job to manually change the margin and print out each file. WPL 
offers a much easier way. 

Type in the following paragraph and save it under the pathname 
'.D2/LETTER'. 

This is a short line of text to illustrate one of the many uses of WPL 
in letter and general document preparation. When the WPL pro- 
gram is executed, each time you press RETURN this document will 
be printed with the left margin 5 spaces greater that the last time. 

Say that we want the above paragraph printed 7 times. The first 
time we want the left margi n set to 0, the next ti me set it to 1 0, and 
the next 20. . . . It would take some time if we had to do it manually. 
The WPL program that does all this is below. Clear memory and 
type in the below WPL program. Remember to press the TAB key 
before each line. 

NY 

PND 

PPD.CONSOLE 

L.D2/LETTER 

PPR 

PLM0 

PNP 

PIN Press RETURN To Continue 

PPR 

PLM10 

PNP 

PIN Press RETURN To Continue 

PPR 

PLM20 

PNP 

PIN Press RETURN To Continue 
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PPR 

PLM30 

PNP 

PIN Press RETURN To Continue 

PPR 

PLM40 

PNP 

PIN Press RETURN To Continue 

PPR 

PLM50 

PNP 

PIN Press RETURN To Continue 

PPR 

PLM60 

PNP 

PIN Done!! Press RETURN To Go Back To The Editor 

NY 
Before savins it, look at the lines 'PPR'. There should be 7 of them. 
After the 'R' in each of them you must insert a control character. This 
is the code that causes Apple Writer /// to clear the screen. If not 
done, the text display will set cluttered up and you won't know 
what is soins on. After each 'R' type 'CONTROL OPEN APPLE Y. 
Just hold the CONTROL and OPEN APPLE keys down and type the 
backslash ("\") key. An inverse (black on white) backslash should 
appear. When you are done save it with the pathname '.D2/TEST.2'. 
If you are all done, execute the prosram with the command 
'[P]DO .D2/TEST.2'. The parasraph will be printed 7 times, each 
one with a left marsin 10 spaces sreater that the last. You did it! 
Now the question is how? 

Going through the WPL program line by line we will first see what 
the individual lines do and then will be able to look at the prosram 
as a whole. The first line is 'NY'. You should be able to see what this 
line does now. Remember, a WPL command is just the same as a 
normal Apple Writer /// control command. So the WPL line 'NY' 
becomes [N]Y. What happens when you press control N and then 
Y? That's risht! Memory is erased. We should all see now that this 
line clears out memory. You should always use it because you 
never know what will be in memory when you start a WPL prosram. 
All risht, that wasn't too hard. How about the next line, 'PND'? 
This should correspond to [P]ND. Try it!, type CONTROL P and then 
ND. Don't get scared, your computer didn't die - it just went into 
the twilight zone. The command 'PND' shuts off the screen. It 
means No Display. To turn it back on, type in [P]YD for Yes Display. 
The line 1.D2/LETTER' in WPL translates to [L].D2/LETTER in 
normal Apple Writer /// notation. This loads the file LETTER from 
the disk in the second disk drive into memory. Once loaded you 
can do anythins you want with it. 

The next line is PPR (Control-Backslash). This is the clear screen 
command. Unless you want a mess on your screen use this com- 
mand before you print anythins. Since we want the paragraphs 
printed on the screen and not on your printer we use the line 
'PPD.CONSOLE'. This translates to [PjPD.CONSOLE which sends the 
printed output to the screen. 

The line 'PLMO' sets the left marsin to 0. Thus all printed lines will 
start at the leftmost column. The Apple Writer /// translation is 
[P]LM0. Once we have set the marsin we can print the parasraph 
with the line 'PNP'. This translates into [P]NP which simply instructs 
Apple Writer /// to besin printing the text in memory. 

These lines printed the first version of our paragraph. Since we 
may want to wait a second or so to admire our work we include the 
line 'PIN Press RETURN To Continue'. This line simply waits for us to 
press RETURN. 



The WPL program has now printed our first paragraph and is 
waiting for the user to press RETURN so it can go on and print the 
other paragraphs. Once the user presses RETURN, the program 
goes on and prints the other 6 paragraphs. 

Once it is done printing the paragraphs, the line 'PIN Done!! Press 
RETURN To Go Back To The Editor' waits for the user to press 
RETURN and the next line 'NY' clears out memory. Congratulations, 
you just wrote (and hopefully understood) your first true WPL 
program. 

The PIN command can be used outside of a WPL program. Just 
type [P] and then enter 'IN Press RETURN To Continue'. The screen 
display will show 'Press RETURN To Continue'. Do that and you will 
be back in the editor. 

Someofyou may be wondering ifthereisaneveneasierwayof 
doing this. Looking at the WPL program you will see that there dre 
seven sets of very similar statements. The basic structure of these 
lines are below: 

PPR 

PLM* 

PNP 

PIN Press RETURN To Continue 

If you replace the asterisk with the numbers through 6, you will 
get the same WPL program li nes as above. The question is, is there a 
way to do that from inside a WPL program 7 The answer is an 
emphatic YES! 

To actually do it we must learn a little more about WPL. Well, let 
me show you the updated program and then describe it. Our 
'Better, Faster, Smarter' WPL program is below. 

Start PGO Begin 



Printlt 


PPR 




PLM +10 




PNP 




PIN $A 




PRT 


Begin 


NY 




PND 




PPD.CONSOLE 




LD2/LETTER 




PLMO 




PLM- 10 




PAS Press RETURN To Continue =$A 




PSX 6 


Loop 


PSR Printlt 




PSX -1 




PGO Loop 




PAS Done!! Press RETURN To Go Back To The Editor =$A 




PSR Printlt 




NY 




PQT 



In the above WPL program we use subroutines, error flagging 
and detection, integer and string variables, and even a simple 
program loop. Before you type it in, remember about inverse 
backslash. Now how does it work 7 Well, all the commands dre 
described on pages 78-79, 83 and 88-90. If you read over those 
sections of the instruction manual you should understand what's 
going on. Next timewe will discuss it further. We will also enhance 
the HELP instruction with a couple of new options! Until then, hit 
the books and start learning (and using) WPL! /// 
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/// to the Mox 



by Al Evans 



bottom of the screen and 
scroll the other three rows 
of horses offscreen. 



Tame the Running Horses 

Here it is, Apple /// users, the column for crazies, the forum for 
people who want their computer to do AAAGIC and don't 
care about the obstacles. We're not talking about stuff that can 
easily be modified to work on a RadShack or an IBM or even an 
Apple ][. We're not even necessarily talking about code that's legal 
according to SOS. We're talking about /// to the Max — tricks an 
Apple /// can perform which will astound the lesser computer. 

There are those who preach device-independent code — pro- 
grams which will work on any computer which runs, for example, 
UCSD Pascal or FORTRAN 77. That's great for the majority of appli- 
cations. But this column is about maximum performance. To get 
the best performance from any computer, you must use device- 
dependent techniques which take maximum advantage of its 
special features and abilities. And the Apple /// has special 
features and abilities which make it capable of running rings 
around any computer in its class. So this column will be about the 
hardware and operating system of the /// and software which 
makes special use of them, whether in BASIC, Pascal, or assembly 
language. 

For an easy introduction to our general orientation, we'll con- 
sider the first question asked in our initial column: How did they 
make those horses run? This will be an interactive investigation. 
You'll need an Apple /// of any configuration, an Apple Business 
Basic Disk, and a System Demonstration Disk. The following instruc- 
tions assume that you're using a system with two floppy-disk 
drives. If not, just use the built-in drive and substitute ".D1 " wher- 
ever ".D2" appears. 

First boot up your /// in Business Basic, and put the "SYSTEM 
DEMONSTRATION" disk in drive 2. Don't boot up on the demo 
disk,- there's no way to get out of the demonstration, which I'm sure 
you've already seen. 

Now type "LOAD .D2/SHOW" (and press <RETURN>, of 
course). Delete lines 0-8999 and lines 10000-24030. Also delete 
line 91 25 and line 91 90. The part of the program which is left is the 
part that makes the horses run. Only fifteen lines. 

Type "INVOKE .D2/HORSES.INV" and "RUN." You should see 
exactly the same horserace shown in the demo program. That 
fifteen lines of BASIC, with the three external procedures HINIT, 
HFRAME(%I), and HSCROLL, is doing the whole thing. Unfortu- 
nately, these three procedures are written in assembly language, 
and there's no simple way to find out how they work. Fortunately, 
however, we can find out exactly what they do from BASIC, and 
that's nearly as good. After all, we can always write our own 
programs to do the same thing. 

Anyway, your screen should now look about like Figure 1, all 
covered with horses. We need to get rid of all of them but the top 
line in order to continue the exploration. Press <ESCAPE> to put 
your /// in the escape mode, and use the "up-arrow" and "left- 
arrow" keys to move the cursor just under the lower left-hand 
corner of top row of horses. You won't be able to see the cursor 
when it's there — this is interesting and important, and we'll come 
back to it later. For now, just press "T" to set the top of the viewport 
below the horses we're keeping, then move the cursor to the 
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Now move the cursor back directly beneath the row of horses, 
press the space bar to leave escape mode, and type: 

FOR l=0 TO 3-.FOR J=0 TO 7:PRINT CHR$(128+8*I+J);:NEXT: 
PRINT:NEXT 

Congratulations, you just drew your own horse. Your screen 
should now look like Figure 2. Those of you who already know why 
that happened can take a break; go on and skip the next paragraph. 
Figure # 2 
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Most of the rest of you do already know that the Apple /// 
system character set is software-defined (like almost everything 
else in the system) and can be changed at any time. In particular, 
characters to 31 [CHR$(0) to CHR$(3D] ^z the control codes, 
and are not normally printed on the screen. However, any of them 
can be turned into a printable character by adding 128 to its ASCII 
code [CHR$(0+128) to CHR$(31+128)]. This is just what we've 
done in the line above — printed out the current representations 
of the control codes in four lines of 8 characters each. The control 
characters have been turned into horses!! This is one of the 
major keys to fast animation on the Apple ///. 

Press <ESCAPE> again, move the cursor to the line immediately 
below the horse you just drew, and reset the top of the viewport 
(press "T") to keep it on the screen. Scientifically speaking, we 
know where that horse came from — we can't be completely sure 
the others didn't appear by magic. Now type the following line 
(see Figure 3): 
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FOR 1=1 TO 10:FOR J= TO 4:PERFORM HFRAME(%J): NEXT: NEXT 

Figure # 3 
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See the horses run! But what's happening now 7 We're not even 
writing anything to the screen. Not only that, but the horse we drew 
ran right along with the others — HFRAME(%J) / whatever it is, 
couldn't possibly know about our own personal horse! Once 
again, this is a major key to Apple /// animation. 

What happened is that the definitions of those control charac- 
ters were changed "on the fly" under software control. The anima- 
tion is almost free — not one character had to be re-drawn. Moving 
6 horses was as fast as moving 1. If there could have been a 
hundred little horses on the screen, they all would have moved just 
like those 6. To be specific, the programming technique used is a 
"partial character set upload" — see the Apple /// Standard 
Device Drivers Manual, p. 71. 

So that's how the horses run. But wait a minute — they also ran 
across the screen. And remember when the cursor disappeared, 
when we first set the top of the viewport 7 

If there's any one of you who hasn't figured out by now that 
"PERFORM HSCROLL" must be the proper command, you really 
should pay closer attention. Go ahead and type it in a few times, 
then we'll analyze what is happening. Figure 4 shows the screen 
after 4 PERFORM HSCROLL's 

Figure # 4 
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Hmmm . . . The horsesjust slid across the screen. So did all the 
text we put on it! Type "GOTO 9030" and you can see the whole 
horse-and-text race. The horses and letters that disappeared on the 
right re-appeared on the left — looks like this is a circular device of 
some kind. But the color blocksjust stood still. Looks as though the 
horses and text dre in one part of memory, and the background and 
foreground colors are in another. 

And that is precisely the case. The screen memory of the Apple 
/// is in two places, both in the system bank ("S-bank"). The 
characters on the 40-column screen (or the odd-numbered char- 
acters on the 80 column screen) are in memory locations $400-$7FF 
(1024 to 2047 for those who speak decimal). The foreground and 
background colors in the 40-column mode (or the even-numbered 



characters on the 80-column screen) are in memory locations 
$800-$BFF (2048-3071). HSCROLL is moving the former, shifting 
each row one column to the right with the character shifted off the 
screen going into the vacated column on the left, without changing 
the latter. 

In the 40-column color text mode, each byte in the screen at 
$800-$BFF is interpreted as a background color (the low nybble) 
and a foreground color (the high nybble). If both of these nybbles 
dre set to the same value, anything on the foreground screen will 
"hide" behind the background. This explains the disappearing 
cursor,- both nybbles were set to (black). 

This is a good example of a device-dependent technique which 
is not even "within the system". As far as I know, there is no way 
these screens can be manipulated separately from a high-level 
language. For those of you who sre interested, the memory maps 
are the same as for Apple ][ text screens 1 and 2. Apple ][ 
assembly-language routines should be fairly easy to adapt for your 
own nefarious purposes. 

What can be done with all this 7 I don't know about you, but it's 
got my wife and me working on a game, Cap'n Magneto. So far, 
we've got a background of 256 x 128 squares that scrolls in all 4 
directions with wraparound and an animated superhero who is 
normallyaspacemanwithblastingjetpaks but turns intoa fluttering 
butterfly on occasion. The sky's the limit! 

And so, off into the sunset, jetpaks blasting. Next month we'll 
talk about the keyboard map and how to change it. After that — 
well, let me know what you want to do with your Apple ///. In 
particular, send me your own findings and let me spread them 
around — I'll give you full credit, of course. There dre lots of 
completely undocumented bits and pieces in the ///, things 
Apple doesn't think we're ready for. So it was with the ][, back in 
the dark ages. But users, working together and trading ideas, had 
figured the ][ out long before the "real" technical manual was ever 
published. We can do the same. /// 
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PKASO /// Printer Interface 

The PKASO /// printer interface system is a hardware and 
software device that allows the Apple /// to operate with just 
about any dot matrix printer in both native and emulation mode. 
It gives the user the option of printing text, graphics or even screen 
dumps on your parallel printer. 

It will connect your Apple /// to the following printers: Apple 
DMP ; Epson MX-70, MX-80, MX-100; NEX PC8023A/C; C.ltoh 8510 
Pro/Writer; Integral Data Systems 460, 560, Prisms, Color Prisms,- 
Okidata 82A, 83A (plus the new 9x series); or Centronics 739, 1 22 
printers. 

The PKASO system consists of the hardware interface that allows 
you to connect your /// to most any parallel dot matrix printer, the 
necessary cabling, the software device drivers that let the interface 
card work with the///, invokable modules to print out the graph- 
ics screen and a set of instruction manuals to tell you how to 
operate the system. 

First we are going to take a look at the interface card. Very simply, 
it is the same interface card the the Apple ][ uses. What makes it 
special is the device driver that connects it to the ///'s world and 
the appropriate invokable modules that allow you to print out the 
graphics screen. After installing the device driver on your system 
diskettes you can use a variety of new commands to easily control 
your printer features from within any program or language system. 

The invokable module (or linkable, if you use Pascal) that prints 
out the graphic screens is very flexible and can print out any of the 
Apple /// graphics modes in three different sizes. You can even 
rotate the picture to print out sideways if your printer doesn't have 
a wide enough carriage to print out one of the larger sizes. 

One of the nicest features of this system is the ability to print out 
in color if you have a color printer! Your IDS Prism can now print out 
your color graphics screens with this package. Many of you know 
that the /// has a changeable character font and that you can 
re-define the format of the characters that you see on the text 
screen. You have probally seen some of the different fonts, Roman, 
Byte, Apple etc. With the PKASO /// system you can have your 
printer print out text in the same font style that your /// uses! 

You can even dump a copy of the text screen to the printer. 
Anything that is on the current text screen will be exactly dupli- 
cated on the printer. You can dump a 40 or 80 column screen with 
amazing simplicity. 

If you dre printing text or graphics and your printer runs out of 
paper, the PKASO card will put a flashing message on the bottom 
right hand corner of the text screen. This is non-destructive, that is 
to say, anything that was there before will be returned whenever 
you put more paper in the printer. Also, if your printer is off and you 
try to use it you will get a printer off line message in the same area. 

One note of concern: Short of turning on the printer or putting 
more paper in, there is no way to get out of the print operation if 
the printer is off-line or out of paper. While you can get out of a text 
or graphics dump by pressing the ALPHA-LOCK key, there is no 
similar exit from either of these conditions. A call to Interactive 
Structures reveals that they are working on a fix to this slight 
problem. 

This brings me to my next point. Interactive Structures, the maker 
of the PKASO /// card has one of the best customer support 
policies I have seen. Everyone there seems to know what is going 



on and dre more than helpful with any problems you may be 
having. I sometimes wonder if their support has tied up too many 
people, but it does give the company a well deserved good 
reputation. 

One of the novelties of the PKASO system is that the instruction 
manuals were printed with an MX-80 printer controlled by a 
PKASO board. The neat part is that it looks quite good! The manual 
that we will discuss is the PKASO /// Printer Driver for Apple /// 
and Matrix Printers Users Manual. 

This booklet tells you everything you need to know about the 
operation of the PKASO driver and associated software that are 
needed i n order for the PKASO board to work with the Apple ///. 
It doesn't assume anything about the intelligence of the user so it 
gives complete information on how to first install the driver using 
the System Configuration Program and then on how to use it. 

Since the SCP isn't easy for first time users, this is a very nice 
touch that other packages should have. After installing the driver, 
the manual shows you how to use this new driver from both Basic 
and Pascal. You can change the size of the characters you print by 
simply entering a new size with the size command. 

The PKASO /// interface has circumvented many of the prob- 
lems of using the features (changing text sizes, column widths, 
setting tab stops, etc.) of a particular printer by creating a system 
that more or less standardizes these procedures. 

Instead of remembering strange character sequences to send to 
each different printer to have it print in say, compressed charac- 
ters, with the PKASO /// installed you will be able tojust type one 
command sequence for all. Since this may not be easy to see, the 
following example may help. 

Normally to have an Epson print in compressed mode (17.16 
characters per inch, others are different) you must send it a 
CONTROL-O. Other sizes can be achieved by sending different 
control codes. These codes are not standard among printers, thus 
what works on an Epson will not usually work on a NEC or others. 

This means that if a program wants to print out data in a different 
size format, it must know what printer it is working on and the 
necessary codes for that printer. Since this is asking quite a bit from 
a program, you normally don't have any options when printing out 
items. 

The PKASO /// uses a standard command format that enables 
programs and users to very easily set size and other information for 
a variety of printers. To have any printer that is installed on your/// 
print out in compressed mode you would send it the following 
sequence ' E2'. All printing operations that followed would be in 
compressed mode. 

Similarly you could_ have the jnformation printed using the 
following commands '~E0', ~E1', '~E2', '~E8', '~E9', '~E10\ Respec- 
tively, this would cause characters to be printed with 1 0, 1 2, 1 6.5, 
5, 6 and 8.25 characters per inch. 

As you can see, remembering ' Ex' is a lot easier than 6 or more 
control combinations for printing in different sizes. There is one 
thing that you should be aware of, if your printer doesn't normally 
print with say, 6 characters per inch, the PKASO /// does not let 
your printer do that. If you specify a size that does not exist on your 
printer, the size actually printed will either not change or will be 
the closest size that your printer does support to the one you asked 
for. 

Similarly, you can easily set up to 16 tab stops and clear them. 
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You can also adjust the vertical spacing to be any increment and 
even issue line and form feeds with ease. 

One of the nicest features of the PKASO /// is the ability to 
change the font of the printer from software. You can now print 
out text with the font style you dre using on the screen! Printing out 
text in fancy gothic script is now very easy. You can also choose the 
inverse screen font and get characters printed in reverse, white on 
black. Figure # 1 shows some of the different combinations 
possible. 
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You will also be able to print a snapshot of the the text screen in 
either normal or inverse (white on black). Just send ' P2' and the 
80 column text screen will be printed out on your printer. An exact 
duplication of whatever is on your text screen is now possible! 
Figures # 2 and # 3 give some examples. You may also print out the 
40 column text screen just as easily. 

Printing out text is nice, right? But how about graphics! The 
PKASO /// system allows your Apple /// to do a graphics dump 
of the Hi-Res graphics screen in either Basic or Pascal. Just invoke 
(or link) the necessary routines from one of the disks and you have 
immediate acces to a very fast and versatile graphics print routine. 

You can have a print out of any of the graphic modes that the 
Apple/// supports in a variety of sizes and shades. Another very 
nice feature is the ability to center the picture in the middle of the 
page by setting the margin. You can also stop a print-out by 
pressing the ALPHA LOCK key twice. This is in case you discover 
you're printing in the wrong mode and don't want to wait for the 
whole graphics screen to be printed. 

If you dre fortunate enough to have access to a IDS color Prism 
the PKASO /// will do a Hi-Res dump in full color. This is some- 
thing to see! All those pie charts and other graphics screens that 
look great on a color monitor look even better on paper. Since I 
can't give you a full color picture in the magazine (yet) you will 
have to be satisfied with the black and white ones that follow. 
Figures # 4 and # 5 show these graphics dumps. 

The instruction manuals show you how to use the PKASO /// 
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system with different software packages. Apple ][ emulation 
mode, Apple Writer ///, Apple Business Graphics, Basic, Pascal 
and Visicalc ^z all supported. Complete documentation is pro- 
vided on exactly how to use the PKASO /// system from all these 
software products. 

Included on the disks that come with the package are excellent 
demonstration programs in both Basic and Pascal. They guide the 
user into a good understanding of just what the PKASO /// system 
can do. The manuals that come with the system are very nicely 
done and contain all the information a user (or programmer!) 
would want. 

I know I've left out some of the things that the PKASO /// system 
can do, but some of these are very specialized and the average 
user will never use them. Suffice it to say that the PKASO /// 
system is very, very powerful I. 

Well, we had to come to it sometime. Yes, this package does 
have some bad points! Even though the PKASO /// command 
language greatly simplifies printer operations, it is not used by 
many application programs directly. Rather, the user must still type 
in character sequences (albeit somewhat shorter) to change text 
options and so forth. I'm saying this so that no one will get the 
impression that the PKASO /// is a cure-all. It's certainly not that, 
but it does come close! 

The only other problem is not really a problem at all but just a 
general nuisance. The interface card that comes with the PKASO 
/// fills about 14 of the space for one card in the peripheral card 
well. With all the 'real-estate' available for an interface card you 
would think they could have put some more things on the card. It's 
a shame to waste the space considering we only have four slots. 
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Like I said, it's not really a problem. Though, it would have been 
nice to see at least another parallel interface port on the same card. 
Oh well, I'm just dreaming again. Maybe the next version! For now 
it's time for the . . . 

Summary 

From what has been said, the PKASO /// interface is a very good 
product in both quality and ease of use, but should you buy it? If 
you have any of the dot matrix pri nters that this card works with, I'd 
say an emphatic YES! For the money and for what it does, this is the 
card to buy. Interactive Structures, maker of the PKASO ///system 
should be given a round of applause for a very nice Apple /// 
interface card. 

Items used in this review: 

128K Apple/// 

1 external floppy drive 

MX- 100 printer 

Interface card: PKASO /// interface for the Apple /// 
Version: ROM - 6.1; Manual - October, 1982; 

Driver - Revision 3 
Contents: Interface card, two instruction manuals, 

two program diskettes. 
Programming language: Assembly, Basic and Pascal 



Operating System: Standard SOS for Apple /// 

native mode, DOS for emulation. 
Copy Protected: No 
Warranty: 90 days 
Cost: $205.00 

The Bottom Line 

PKASO /// system 

Performance: Excellent 
Documentation: Excellent 
Ease of Use: Excellent 
Error Handling: Good-Excellent 
Over All Rating: A 

Quick £ Easy Data Master 

The advertising for this program says that it is 'A Data Base 
Program That YOU Can Master'. Does this claim hold water? Well, 
after a careful review I have found that it all depends on who YOU 
dre. If you don't mind (or like!) making a moderate amount of 
changes in the Basic program, it's for you. However, if you don't 
know how to program I'd suggest you look elsewhere. 

Another part of the advertising for this program says something 
to the effect, The ideal data base program is one that you can 
design exactly the way you want it: prompts, edits, error messages 
. . .toyour specifications/This istrue, I always want to make some 
changes in the applications programs I own. It is also true that this 
package lets you define all these things. 

Quick & Easy Data Master is a set of Basic programs that allow 
you to modify a generic Basic Data Base Program into what you 
want. It accomplishes this through an interactive question and 
answer session which asks you exactly where you want to put 
prompts, error messages and other items on your screen. 

When you finish answering the questions, a custom stand alone 
data base managment program is created. You can then RUN the 
program and use it. Uniike most other Data Base Managements 
packages, if there is something in the program that you don't like, 
you can change it. 

Since this is an idealized situation, let's say right off that there are 
a few problems with this package. First of all, the documentation 
stinks. The instructions manual consists mostly of bad photo- 
copies. The average user can work around this problem, yet the 
information on the photcopies is also bad. This is a real shame 
because the program has many good points. If the documentation 
was as good, this would be a very useful program. 

Enough of that, let's now look at what the program does. There 
sre two program disks in the package. After you boot the system 
disk, a message will be displayed to insert the other disk in the built 
in drive. Next a menu screen will be displayed. The options are as 
follows: 

D . . . Demo Quick & Easy 
E . . . Edit a program 
R. . . Run Quick & Easy 
X. . . Exit Quick & Easy 

The option 'Demo' allows you to generate a demonstration 
program from a pre-defined format. You can use this option to see 
exactly how a data base program is created by this package. The 
program disks come with two pre-defined formats that you can 
use with the demonstration. One is a simple mailing list format and 
the other is a full blown sales invoicing format. 



26 



April/May 1983 



ON THREE 



/// 



/// 



/// 



/// 



/// /// 



/// 



/// 



/// 



/// 



/// /// 



/// 



/// 



If you choose the 'Demo' option, you will get first hand knowl- 
edge of how the application program was made. If you are going 
to use this package in any way, this option will help you out. You 
can have it run automatically from the pre-defined format or pause 
after each question. A very good learning tool for the beginner. 

You can use the 'Edit' option after you have made your data base 
program and discover you need to make some changes. This is 
particularly useful because you don't have to re-type all of the 
previous program format. If you want to change the menu titles or 
somethings like that, this option makes it easy. 

The 'Run' option lets you use the Quick & Easy Data Master to 
create your custom application program. After answering all the 
questions, your answers will be used to create the program. These 
answers will also be saved so that you may later change them with 
the 'Edit' option, or use with 'Demo'. 

The last option is 'Exit'. You can use this option to leave the 
application program and go to Basic. From here you can RUN any of 
the programs you may have created or any other Basic programs 
you may have. 

Since all the other options sre based on it, we will now discuss 
the 'Run' option. As stated, this allows you to create your own 
custom data base management program. Before you start it up you 
must first design the screen displays that you will use in your 
application program. To do this you must fill in the worksheets 
provided with the system. 

These worksheets are just pages with numbered grids corres- 
ponding to screen positions. You fill in what goes where and then 
read it off the page when the program prompts you for where to 
put items on the screen. This isn't too bad, but the worksheets 
seem to have been designed for a 40 column screen. A second 
page is provided for columns 40 through 80. This is unfortunate 
because it make it a little harder for the user. One other complaint I 
have is that only one sheet is provided, if you're not perfect you dre 
going to have to make some copies. I'd suggest about twenty. 

After you finish designing the overall format for your programs 
screens you should use the 'Run' option to start the creation of your 
program. Nowyou will be asked questions such as the name of the 
program, any title message you would like displayed by your 
application program and other general information. 

The most important questions come next. Here is where you 
must have everything figured out on paper. The program will ask 
you the maximum amount of space that should be reserved for 
each field of information. You can't just think about something in 
your head and try to answer the questions, you have to figure it ail 
on paper FIRST. 

There is one annoying part of this, someone accidentally spelled 
'field', 'feild'. Come on guys, you should of caught that mistake long 
before you released the program. 

Anyway, after you specify how much information each field is 
supposed to hold, you dre asked which field is to be the key item. 
This is the part of the record that is found fastest in a search, and 
some though must go into the decision. Ifyou are creating a mailing 
list that will be sorted by zip code, the zip code should be the key 
item. However, if you need quick retrieval in another field, you 
should choose that one as the key item. 

You can not set up a double key, whereby you can get to any 
record by either, say name or zip code very fast. I sometimes 
wonder if the people who write data base management programs 
ever finished high school let alone get a degree. Doesn't anyone 
else out there know how to set up a file handler with a double key? 

Getting back to business, after you choose a key field you must 
then say exactly where on the output screen to put all the items in 



the record. Next, enter all the prompts that are associated with 
each field in the record. Now you must indicate what type of 
information is to be entered into each field. Your choices are 
numeric or character data. A zip code and dollar amounts are both 
numeric types of information while a name or address is character. 

One of the nicest features of the program is the ability to have 
your application program detect bad information when it is typed 
in. You can specify that it will be bad input if it in a date format, not 
alphabetic, not a state or not an entry (blank). 

You can cause bad input messages to be displayed if the user 
types in any kind of data that you don't approve of. Thus, if a 
character entered is not numeric,- not found in a specific file, an 
error message can be generated. 

This is a very nice featue that I wish more programs would offer. 
After all this information is entered, you must then answer whether 
or not you want additional prompts or headers on the screen in 
addition to what was defined in the prompt specifications. 

The next round of questions you must answer is whether or not 
you need to perform calculations on any of the fields in the record. 
Say you want to take 6% sales tax off of one line and put it on 
another, this procedure will allow that. 

In addition to computed data, this package allows you to share 
data from one program to another by using interactive files. This 
allows you to transfer information from one file to another 
automatically. 

We're done! After quite a few minutes of program design you 
now will have a complete data base management program written 
in Basic that you can make small changes in or major ones if you 
really don't like the way the program is written. 

Now is time to look into the applications programs that it creates 
from your instructions. When you RUN the program it will ask you 
what data file to use in the program. If the file doesn't exist you can 
initialize the new file and then use it. When finished finding or 
initializing the data file, you will get a menu of all the available 
options. They dre reprinted below: 



REPORTING 

M — Make a Report 
P — Print a Report 



DATA ENTRY 

E — Enter Data 
L — Lookup Single Records 
U — Updata Single Records 
D — Delete Single Records 
F — Update Any/All Records 
S — Scan/Modify All Recordrs 
X — Exit Program 
I — Initialize/Fix Data File 



Once you get to this menu you can now choose any of the 
above options. Since there are quite a few, let me just tell of some 
interesting things I noticed with the created programs. 

When you are updating a record in your data base, you can't 
change the key field, it's not allowed. Thus, if the person changed 
his or her name, this program would be in trouble. The lookup 
function is fairly standard, you can search for items using wildcards 
that will match only certain things in each item. 

I've had some intermittent problems with the 'Scan/Modify' 
option. At times it will just not work. It seems that you must first 
attempt and fail to use this option a few times before it does work. 

You can generate custom reports and save them using the 'Make 
a Report' option of the main menu. You can put the information 
from a data screen into any print format you desire and have the 
computer print your data out in that format. You may also save the 
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report specification to disk for later use. 

I have found another intermittent problem with this option. It 
seems that after creatins a report specification and writing it on 
disk, the file is not closed. Because the application program is 
written in Basic, the user can change any part of the program that 
they don't like. 

When printing a custom report I have found another serious 
problem with this package. When printing to a disk file, only one 
record is ever written! It seems that the records dre printed with an 
absolute record number and thus the only one you will ever see is 
the last one printed. This is only a problem when printing to a text 
file on disk. Printing to the console or printer is fine. 

For those few who want to make some changes to the program, 
four pages in the manual dre devoted to technical information of 
the program. The major program variables are explained and the 
major routines in the program are documented. Even the B-Tree file 
handler (and how to use it) is explained. 

Below are some timings I made of the programs performance. 
Beware, they will change depending on the number of active 
drivers, and the size and speed of any disk drives you may have in 
your system. I used a standard Apple ///floppy in my tests. Hard 
disk drives (of course) will give much quicker operations. 

Boot Time: 22 seconds with given drivers. 
Print 100 labels to disk: (below design) 5:20. 

Name: 



Address: 



City: 



State: 



.Zip: 



Disk Capacity: (above design): Approx. 950. 

Summary 

With a little better documentation and quite a few minor 
program changes this would be a very useful data base manage- 
ment program. However, if you don't have the knowledge or time 
to make those changes - it's not foryou. As I see it, this package is a 
good buy for people willing to play around with a program that is 
generally good, but needs some work. 

Advanced Software Technologym Inc. is to be commended 
with leaving their programs 'Open' so that people can tinker with 
them. Very few other manufactures will do this and for mostly that 
reason (the price is good too!) I find that this program is worthy of 
our support, even if it does have some major problems. /// 

Equipment used in the review: 

128K Apple/// 

1 external floppy drive 

Program: Quick & Easy Data Master for the Apple /// 
Version: Program created 3/4/82 

Contents: Two program diskettes, User's manual 

Programming language: Basic 

Operating System: Standard SOS 

Copy Protected: No 

Disk Warranty: None 

Cost: $69.95 



The Bottom Line 

Quick & Easy Data Master 

Performance: Poor-Fair 
Documentation: Poor 
Ease of Use: Fair-Good 
Error of Handling: Good 
Over All Rating: C 

Profile & Backup /// 

ProFile 

The ProFile drive for the Apple /// is a fixed-media random 
access 5Va inch disk drive and disk controller card with a capacity 
of 5 megabytes (that's 5 million bytes!). That's a description of 
Apple's hard disk. For a little closer look at this device, read on. 

If your data files feel a bit cramped using the standard old 140K 
floppies or if you just need faster disk operations, a hard disk may 
be for you. The ProFile will store the equivalent of 35 floppy disks 
and access the information about ten times the speed of a floppy. 

This sounds great, right? Well, there are some drawbacks. First, 
unlike a floppy disk drive, you can't remove the disks. That is what 
'fixed-media' means. Thus you dre stuck with the disks that are 
sealed in the drive. The second problem is that it's only 5 mega- 
bytes. I know that it may seem like a lot, but after you begin putting 
all your software and data files on ityou will seethatyou may want 
more room. The last major problem is that the interface card that 
connects your /// to the ProFile only can attach to one ProFile. 

The first two problems aren't that great, but the last one is. Since 
the Apple/// has only four slots we must be careful how we fill 
them. Other disk interface cards allow you to hook up to a total of 
four disk drives, and I find that using up a whole slot for just one 
disk drive is just plain crazy. There is more than enough room on the 
ProFile interface card to do this and I can't see why Apple didn't at 
least put two interfaces on the card. 

Oh well, you can't have everything. The ProFile is a very well built 
and reliable disk drive. I understand that to date not one has been 
returned to Apple due to a hardware failure. Now that's a very 
good number! I've had mine for about 17 months now and have 
yet to loose any data. 

One of the things that makes the ProFile so reliable is that 
whenever you turn it on, it goes through a self-test procedure that 
does a complete surface analysis of the disk, checking for any 
marginal areas. If a bad sector is found it is automatically spared out 
to one of the sectors that is kept off-line for these purposes. 

What's all this stuff about 'spared-out'? Well, the ProFile disk 
drive has a storage capacity of 9792 blocks, or a little over 5 million 
bytes of information. The average user will see somewhat less than 
that however. 64 of those 9792 blocks are reserved (or spared). 
When it performs the self-test these are the blocks that dre used if a 
bad block is found on the disk. 

Even though I have not lost any data, I have encountered bad 
blocks on the ProFile disk drive. These have always given some 
strange disk I/O error message. After getting these bad blocks I 
have been able to recover by simply turning off the drive and then 
turning it back on again. When it went through the self-test it found 
the bad blocks and replaced them with fresh new ones. 

This is a very nice feature that I don't thi nk any other drive offers. It 
is well worth the extra 60 seconds or so it adds to the time it takes 
before the disk can be used. Now all your programs can use larger 
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data files than what are allowed on the standard 140K floppy. 

The instruction manual that comes with the system shows you 
exactly how to install the disk interface card and add the ProFile 
disk driver to your boot diskettes. If you don't want to, your dealer 
will install the interface and the necessary driver, but the manual 
does give you all the details. It also devotes a chapter to how the 
drive operates. I don't think that any user would ever need the 
information in that chapter, but if you want to know exactly how 
the drive works, there's a chapter for you. 

There is also an appendix on how to add Pascal system files to 
the ProFile. This is not a very sophisticated method and you would 
be better off if you added Pascal to the ProFile usins Quark's 
Catalyst or Dr. Jeppson's Pascal Patch. 

One of the nicest features of the ProFile is the demonstration 
program that comes with the system. A color graphics demo 
second to none! Wei I over one hundred pictures dre stored on the 
ProFile and are displayed by the controlling program. It's a real 
sight to see! 



Backup /// 



One of the strong and weak points of any large capacity disk 
drive is its ability to store very large files. A strong point because 
you can make larger files than with a floppy disk. A weak point 
because you can't make a copy of a 2000 block fi le on a 280 block 
floppy disk. 

The program Backup /// was created to solve this problem. 
Very simply put, the program allows you to copy information from 
one storage device (a ProFile) onto a number of disks in another 
drive (a Disk ///) and later restore the information if needed. 

This means that you can copy any ProFile file too large to fit on 
one diskette onto several diskettes. You can even do a full volume 
backup and store everything on the ProFile to floppy disks. A 
variety of options also let you backup and restore selected files to 
and from the ProFile. A very sophisticated and easy to use program, 
it is now supplied with each new ProFile that is sold, and has been 
sent to some current ProFile owners. 

I said some because I have received many calls and letters from 
people who say they bought their ProFile months and months ago 
and have yet to receive their copies of Backup ///. I wish I could 
say that the reason that they didn't get their copy was because they 
didn't send in their registration card, but I can't. One gentlemen 
who phoned me said that he bought his ProFile in June of lastyear 
and promptly sent in his registration card, but has yet to receive 
Backup ///. After many calls and letters to both his dealer and 
Apple he still has not gotten his copy. 

If you have ProFile and do not have a copy of Backup /// and 
your dealer can't get one for you, address your complaints to the 
following person: 

Clayta Morand 

Peripheral Systems Marketing 
Apple Computer, Inc. 
2720 Orchard Parkway 
San Jose, California 95134 

After spending a couple of thousand dollars on a ProFile, Apple 
should be a little more responsive to these problems. 

The User's manual that comes with Backup /// is one of the best 
that Apple has ever done. Not just a reference booklet on how to 
use the program, it is a complete tutorial that shows you exactly 
how to backup and restore your files. 



Backup /// will also format disks so you don't have to first boot 
the System Utilities Program and format the disks there. When 
backing up files you won't be caught without a useable diskette 
because with this program you can just take a blank diskjust out of 
the box and let the program format it. 

Backing up files couldn't be simpler, you just specify which files 
you want to use and insert the disks when prompted to. The 
program first verifies that the disk is good and then begins the 
copying. When finished putting information on that disk, it again 
verifies the disk to give an extra level of assurance that your backup 
disks dre good. 

There dre three options for backing up your files. You can backup 
by Pathname, backup Modified files and backup by Date/Time. 
With these options you can specify many different file combina- 
tions to backup by. 

The backup by Pathname option lets you backup an entire 
volume or part of a volume. You can use a device name, pathname, 
or a file pattern. The wildcards used in the file pattern dre the same 
as used by the System Utilities Program. 

The backup Modified files option lets you backup files that have 
been modified since you last made a backup. Thus if you have 
added or changed files on your hard disk since the time you last 
backed it up, you can use this option to copy only the files that 
have been changed. This is very useful if you have changed quite a 
few files on a number of subdirectories and can't remember where 
all of them dre. 

The backup by Date/Time option lets you backup files based on 
the date and time of last modification. Thus you could specify to 
make a backup of only files that have been modified since a certain 
date. This is useful only if your Apple/// has a functioning clock. 
Otherwise you must have set the date and time with the System 
Utilities Program for it to be of any use. 

Restoring files is just as easy. Just specify which files you want to 
restore and insert the proper disks when prompted. Very, very 
simple! Towards the end of the manual is a section devoted to 
examples of using Backup /// to backup and restore files. Just 
another nice feature of this manual. 

Three appendices cover everything from hints to a list of com- 
mands and even a complete section on error messages and how to 
recover from errors. It would have been better if these were 
reproduced on a handy reference card, but just being there is very 
good. 

If you have another disk drive, such as one of the Micro-Sci high 
density disks, you can use Backup /// to backup files with greater 
ease. Using the Micro-Sci A1 43 disk drive that holds four times the 
amount of a normal disk drive (over half a megabyte!) you can 
back up an entire ProFile with 10 disks or less! While a full volume 
backup of the ProFile onto standard 140K disk drives takes about 
90 minutes, using the Micro-Sci A143 it only takes about 30 
minutes. 



Summary 



The ProFile - Backup /// combination is a fantastic tool for all 
Apple /// users. With the speed and capacity of the ProFile and 
the backup abilities of Backup ///I highly recommend these items 
to all Apple ///users who find that the Disk/// is just too limited. 
With the addition of a high density disk drive by Micro-Sci, this tool 
is further enhanced. 
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Equipment used in the review: 

128K Apple/// 

1 ProFile hard disk drive 

1 external floppy drive 

Item: ProFile Hard Disk Drive & ProFile driver 

Version: Driver - Version 1 .30 

Contents: Interface card, ProFile Hard Disk 

Owner's Manual, two prosram diskettes. 
Operating System: Standard SOS 
Warranty: 90 days 
Cost: $2199 

Item: Backup/// 

Version: 1.0 

Contents: Backup /// User's Manual, Program Diskette 

Programming language: Pascal 

Operating System: Standard SOS 

Copy Protected: No 

Disk Warranty: 90 days 

Cost: Included with ProFile Disk 

The Bottom Line 

ProFile - Backup /// System 

Performance: Good-Excellent 
Documentation: Excellent 
Error Handling: Excellent 
Over All Rating: A 

CRITICAL PATH SCHEDULING 

If you dre responsible for project scheduling, you know about 
the hours of planning and re-planning involved in the execution of 
a complex project. With the computer age upon us, it was just a 
matter of time before project management could be simplified. 
The CRITICAL PATH SCHEDULING system by Great Divide Software 
is the management tool that does just that. 

I am going to assume that the reader knows a little about critical 
path and stuff of that nature. A detailed explanation is beyond the 
scope of this review so it will be left out. This review will show if 
the system is easy to use, and any problems (or strong points) that 
the package has. 

To start off, the CRITICAL PATH SCHEDULING system is a collec- 
tion of Basic programs that provides project managers a tool for 
defining and analyzing the overall concepts of a project and 
provides a powerful method for scheduling the many tasks neces- 
sary to complete the project. 

Using the CRITICAL PATH SCHEDULING system, it is easy to insure 
that all important tasks are included at the start of the project. Using 
the information that the user furnishes for each task, the program 
analyzes the whole project from start to finish. A report can then be 
compiled that lists every task, with start and completion times. 
Also shown on the report are the tasks that are most critical to the 
completion of the project. 

Each task generates an early start and finish date, and a late start 
and finish date. These dates are the earliest a task can be expected 
to start and end, and the latest the task can be postponed without 
affecting the completion time of the project. The difference 
between these two dates is called the 'float' and is included on the 



report. Also included is the 'free float' which is the amount of time 
a task can be delayed without affecting any other task or the 
completion date of the project. 

The project reports can be in a variety of formats. Reports by 
early or late start, node or float order dre all possible. Special 
formats such as five, six or seven day work weeks are a snap to 
prepare. You can also specify up to 100 non-working days in any 
project. Another very nice feature is the ability to do a report 
without specifying a start date for the project. Thus you can 
determine the length of time a project will take, regardless of the 
starting date. 

The package comes complete with a detailed user guide/ 
instruction manual and two program diskettes. Since the creators 
of this program rightfully realized that hard disks will give much 
quicker program operations, they included the capability of put- 
ting the CRITICAL PATH SCHEDULING system onto your hard disk. 

When you first boot this system, a system configuration menu 
appears. Simply put, you have the option of putting all of the 
programs and data on the hard disk, programs on diskette - data on 
hard disk, or both programs and data on diskette. You can later 
change this if you wish. Thus you are not forever stuck with your 
CRITICAL PATH SCHEDULING system on diskettes or hard disk. 

If you decide to put the programs on your hard disk, they dre all 
moved automatically. This process takes about four minutes with 
the ProFile. You can manually turn the screen off ('CONTROL 5') to 
speed this up a bit. 

The boot diskette that comes with the system has the '.PROFILE' 
hard disk driver on it, so you won't have to put any overtime in with 
the System Utilities Disk. You aren't locked in to just the ProFile 
either. Where the programs are put is entirely up to you. If you want 
to use a hard disk other than a ProFile, you will have to add its driver 
to the boot disk's SOS. DRIVER file. 

The ability to transfer programs to a hard diskisseldom found in 
the computer programs of today and I applaud the people at 
Great Divide Software for integrating their software in this manner. 

The CRITICAL PATH SCHEDULING system allows multiple pro- 
jects to be on a hard disk at once. It also allows you to switch 
between projects very quickly. With the programs on the hard disk, 
a menu of current projects is displayed upon booting. Choose the 
one you want and you get it. If you want to change from one to 
another you don't have to reboot the system, just choose one of 
the menu options and you can go to a different project. 

One of the nice things about the CRITICAL PATH SCHEDULING 
system is that it comes with a set of sample data. This al lows you to 
practice using the system before you set up your own projects. 
With this you don't have to worry about hurting your own data! 

After choosi ng the project you want to work on, the main menu 
is displayed. It is reproduced here as figure #1 . 

Figure #1 

CRITICAL PATH SCHEDULING SYSTEM MENU 
SAMPLE PROJECT 



►0 QUIT 

► 1 ENTER/ ACCESS PROJ. INFO 

► 2 ENTER TASK DATA 

► 3 ACCESS TASK DATA 

► 4 PRINT TASK DATA 

5 SORT AND TEST DATA 

6 CALCULATE CRITICAL PATH 



SWITCH PROJECTS 
MOVE FORMATTED REPORTS 
CREATE/COPY/DELETE A PROJECT — ►! 
DESIRED OPTION NO 



BASIC REPORTS 

►10 CRITICAL PATH REPORT 
►11 KEY WORD LIST 
►12 MANPOWER REPORT 
►13 TASK BAR CHART 

DATED REPORTS 

►14 CRITICAL PATH REPORT 
►15 KEY WORD LIST 
►16 MANPOWER REPORT 
►17 TASK BAR CHART 



I SPOOL REPORTS 
? 
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As you can see, arrows point to some of the options. These are 
used to indicate which options dre currently available for use. The 
above example shows that we are using the 'SAMPLE' project that 
is included with the system. Since there is data, there are arrows 
pointing to options 0-4 and 7-18. These are the ones we can 
presently use. 

One feature of the system that I don't like is option #0. This is the 
'QUIT' option and if you press and RETURN, you can not recover 
the program. There should be some prompt message asking if the 
user really wants to quit. Over the past couple of months I have 
accidentally chosen option #0 many times. 

The instruction manual that comes with the CRITICAL PATH 
SCHEDULING system isverygood. It contains step by step instruc- 
tions that leads the user through the system. Whi le not typeset, the 
instruction manual comes in three ring binder format. One of the 
biggest reasons that I like the manual is because the pages are 
printed on only one side. Thus there are no readability problems 
due to seeing the back side of a page through the front. 

After preparing your project's data using the example in the 
instruction manual, you enter the project information using option 
#1 of the main menu. Here you tell the program the name of the 
project, the starting month, day and year. Also i ncluded is the work 
week type (5,6 or 7 days), and the non-working days during the 
project. 

Here you will also specify where to send any report, in other 
words - which printer driver. This will normally be '.PRINTER', but 
the user can change it to any configured printer driver. You can also 
specify any control characters to send before printing the report. 
This enables you to force compressed printing to squeeze more 
information on a page. 

A report heading can also be specified which will appear at the 
top of all printed reports. This can be up to 60 characters long. To 
maximize memory use in the Apple /// this option also asks you to 
specify the maximum number of tasks your project will need.Upto 
2150 can be specified, but it's best to use the default value (1000) 
unless you know you will need more. 

The next three options (number's 2-4) are used to enter, update 
and print the task data. These processes are very simple due to 
good instructions and screen menus. Complete editing functions 
are included so the user will not have to re-type the entire task data 
due to a single mistake. 

Option number 5 sorts and tests the task data. It tests to check 
that the data is correct before you compute the critical path. You 
can also have the program directly go to option number 6 and 
compute the critical path if the data is correct. Any errors are 
displayed on the screen for the user to see and later correct. 

If you have finished with your work on one project and want to 
go to another, option number 7 allows you to switch projects 
without rebooting the system. Each project's task information is 
kept on a different set of data disks, or on different subdirectories if 
you are using a hard disk. 

Option number8 isa bit confusing. It allows you to view report 
files stored on disk, move the report files to a printer, and delete 
report files to regain disk space. Now what is a report file? Well, 
that's not so hard. They are CRITICAL PATH SCHEDULING reports 
that dre saved on a disk instead of being printed on a printer. Now, 
option number 8 allows you to manipulate these reports, but how 
do you create them? There isn't anything in the table of contents! 

After much searching (two days worth) I finally found out how 
to do it. Directly after the description of option number 4 there are 
two special notes. The first of these is how to get a report printed 
on the screen. After using the system for a while I had found 
this out. All you do is press 'OPEN APPLE S' and the report will be 



printed on the screen. I learned this because on the report options 
menus there is a line that says to press 'OPEN APPLE S' to get a 
screen print-out. 

The second of these special notes is how to print the reports to a 
disk file. Instead of pressing 'OPEN APPLE S', simply press 'OPEN 
APPLE F' and you wi 1 1 be prom pted for a Fi le to send the report to. 
Why doesn't this merit a special line like the print to screen line? I 
don't know! There should at least be a section in the table of 
contents on how to accomplish it. Hopefully the people at Great 
Divide Software will fix this little bug before it gives anyone else 
headaches. 

Whi le we are on the subject, about the only other problem in the 
manual is on pages 34 and 35. On these pages it states that there 
are two formatted reports on the diskette that comes with the 
system. In the manual they are called SAMPLE1 & SAMPLE2, yet they 
are not on the diskettes that I received. 

Option number 9 allows the user to create, copy and delete 
new projects. This is very useful, because the user doesn't have to 
boot up the System Utilities Disk to make a copy of their important 
task data. 

Options 10 through 18 are used to print reports in a variety of 
options. Reports using early and late start dates, float and node 
order are easily printed. One of the nice features is the ability to 
print out a key word report. With this capability you can print a 
selected portion of the critical path report based on a 'keyword' in 
the description of the tasks. 

Thus you can specify work that is say, subcontracted out by 
putting the word 'Sub' in the description of each task and later 
print out only that portion of the report whose tasks descriptions 
begin with 'Sub'. A very useful feature. 

Manpower reports that indicate the total manpower required 
for each task can be printed, giving the project manager total 
control in the determination of crew size. 

Probably the most important report option is the Task Bar Chart'. 
This report gives the same basic information as the other reports, 
but gives it in a pseudo-graphical format. In this way, the user can 
see how various tasks relate to each other. Text symbols (*=) are 
used to show critical and non-critical tasks in the project. 

This is a very nice feature because it shows the user exactly 
which tasks can be delayed, and when they must be completed. 
Though nice, I think it should be done a little differently. With the 
exciting graphics capability that the Apple /// offers, a much 
better implementation should have been written. 

On each report you can have the current date printed. The 
problem here isthatyou must enter the date manually. Since many 
Apple /// owners now have a clock installed, programmers 
should use the clock instead of always asking the user to supply 
the date. 



Summary 



The CRITICAL PATH SCHEDULING system is a very useful tool for 
anyone who is involved with project planning. It isn't a Lisa Project, 
yet it does provide a very useful function for project managers. 

The few minor problems in the program and documentation are 
hardly enough to turn me away from the program, but the price 
$495 makes me think twice. Because it is written in Business Basic, 
the more advanced user is able to tinker with the system to adjust it 
more to his or her needs. Since it does have many fine features, I 
think it deserves our support. 

Overall the CRITICAL PATH SCHEDULING package does help 
project managers do their job, so this may be the package foryou. 

Continued on page 9 
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Three Shorts — Fini! 








by Devin Sexson 



The followins dre snappy little sraphics exercises with levels of 
complexity and thoughtfulness that are unusual. 
To use, just type them in and save them. Make sure the Basic disk 
is on-line and type "RUN." The Basic disk is needed because the 
file "BGRAF.INV" is used. 

ON THREE will pay $25 for any short demonstration program 
used in this space, so send in your favorite today, and we will see 
you next time on ON THREE. /// 



REN **#«***mtm#M##t*H*#*m*M#***#M*M» 
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REN 
REH 
REH 
REH 
REH 
REH 
REH 



Dazzling Rectangles 
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This short prograe displays a neat 
pattern of dazzling rectangles in full 
color. To use, type in the prograe 
and then 'RUN'. Hake sure you have 
the 7BASIC/BBRAF.INV on-line. If 
not, enter the correct pathnaee. 
REH HmHftHmttf*HtttiHf«»tm»Hi«Htt* 
ON ERR INVQKEVBASIC/BBRAF.INV 
PERF0RH initgrafixiOFF ERR 
PERFORM grafixeodettl.Xl) 
PERF0RH grafixon 
PERF0RH fillport 
iX«3:xI»0:zl«279:qI»0:yl-191 
PERF0RH viMport(lxZ f ZzZ f ZqZ t ZyZ) 
ON KBD B0T0 1000 
FOR rl=l TO 99 
pcl*pcI+l:IF pcl«16 THEN pcX-1 
PERFORH pencolor(lpcl) 
PERF0RH eoveto<Xxl,lyl) 
PERFORH lineto(XzX,XyX) 
PERFORH lineto(XzX,XqX) 
PERFORH lineto(XxX.XqX) 
PERFORH lineto(XxX,XyX) 
xX»xX+iX:yX»yX-iI:zX*zI-iX:qX*qX+iX 
NEXT rX 
TEXT:END 

IF KBD-27 THEN POP: TEXT: HONE: END 
ON KBD S0T0 1000 
RETURN 



REH ******************************************* 



REH 
REH 
REH 
REH 
REH 
REH 
REH 
REH 



Randoe Triangles 



60 PERFORH viewport(X0,I139,X0,X191) 

99 ON KBD 60T0 1000 

100 FOR r«l TO 20 

110 xlX>139*RND(i):yiX«191tRND(l) 

120 x2X«139*RND(l):y2X>191«RNDU) 

130 x3X*139*RND(D:y3X'191»RNDU} 

140 PERFORH pencolor(XRND(l)*16) 

150 PERFORH eoveto(XxlX,XylX) 

160 PERFORH lineto(Zx2X,Xy2X) 

170 PERFORH Hneto(Xx3X,Xy3X) 

180 PERFORH linetodxlI.Xyll) 

190 NEXT 

200 xlX«139tRND(l):ylX«191#RND(l) 

210 x21=139tRND<l):y2l«191*RND(l) 

220 PERFORH viewport IXxlI,XylX,Xx2X,Xy2X) 

230 PERFORH fillport 

240 PERFORH viewport (10,1139,10,1191) 

250 B0T0 100 

999 TEXT: END 

1000 IF KBD=27 THEN P0P:TEXT:END 
1010 ON KBD 80T0 1000 

1020 RETURN 



This prograe will display a nueber of 
tringles of randoe size, in a variety 
of colors. To use, enter the prograe 
and then 'RUN'. Hake sure that the 
file 7BASIC/B6RAF.INV is on-line. 
If not, enter the correct pathnaee. 

REH **M*»m*Mt#t*f***»#H#*#»*#M##*t##t«*## 

ON ERR 1NV0KEVB6RAF.1NV' 

PERFORH initgrafixiOFF ERR 

PERFORH grafixeode(X3,U) 

PERFORH grafixon 

PERFORH fillport April/May 
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REH ******************************************* 



REH 
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Hoving Color In A Diaeond 



This prograe will display a pattern 
consisting of a colorful diaeond with 
colors constantly changing within it. 
To use, type in the prograe and then 
'RUN'. Hake sure that you have the 
file 7BASIC/B6RAF.INV on-line. 
REH t*#*mmm#Mi**mmmmmt»*#*m« 
ON ERR INVOKE'/BSRAF.IHV 
PERFORH initgrafixiOFF ERR 
PERFORH grafixeode(ll,ll) 
PERFORH grafixon 
PERFORH fillcolor(lO) 
PERFORH fillport 
ON KBD 8QT0 1000 
zl«l:gl>280:hl>96!al'140:cX>236 
dl*l40:el*-44:il=0:jl=96 
FOR kX«236 TO 97 8TEP-1 
fM6tRND(l):PERF0RH pencolor(lfl) 
PERFORH eovetodal.ld) 
PERFORH lineto(lgl,lhl) 
PERFORH lineto(XdX,XeX) 
PERFORH lineto(XiX,XjX) 
PERFORH linetodal.ld) 
gl*gl-zl:hl=hl-zl:dl«dl+zl:el*el+zl 
iX»iX+zl:jX«jX*zX:aX«aI-zX:cX«cX-zX 
NEXT kX 
TEXT: END 

IF KBD*27 THEN POP: TEXT: H0HE: END 
ON KBD 60T0 1000 
RETURN 
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Lazarus /// (Undelete 
your deleted files!) 

How much are your important data files worth? $100, $1000? 
Even if you back up your files resularly, the one file you accidentally 
delete will be the one you haven't ever backed up. 

Wouldn't it be sreat if you could somehow resain those files you 
deleted? Well, with Lazarus /// - you can! Very easy to use, just 
insert the diskette with the files you deleted and Lazarus /// will 
recover it. Completely user friendly, this prosram has on-line help 
and tutorial screens to aid in the use of the prosram. It even works 
with ProFile and other disk drives! 

If you order this prosram today, you can set it for the pre- 
introductory price of $24.95. Orders postmarked after July 30, 
1983 will be sold at the full price of $29.95. This prosram will be 
shipped on July 30, so place your order today for the best Apple 
/// utility in town. Please add $1.50 for shippins and handlins. 



Disk Of the Month 

Do you have the ti me to type in the prosrams in each issue of ON 
THREE? Wouldn't it be great if there was a way to get all the 
prosrams without havins to type them in? -There is, allyouhaveto 
do is buy the disk! 

DOM # 1 - Extra Disk Space Plus! 

This disk contains all the prosrams contained in the January and 
February-March issues ofON THREE. Included are Disk Pak1, which 
will give you four extra blocks of disk space on all your data disks (a 
very handy feature for those budset conscious people who don't 
have a hard disk!),- Disk Pak2, which lists the files on a directory 
using Pascal; all of the Graphics and Sound Demos and much, 
much more! 

DOM #2 - Changing the Characters 
Of Your Printer 

This diskcontains-a program that will do a most amazing thing, it 
will enable you to change the characters that your Apple Dot 
Matrix (or Prowriter) printer prints with. Now your DMP can print 
with the same characters that are shown on your text screen. Fancy 
Gothic letters and many other fonts are now available to use on 
your printer. Complete documentation makes this program very 
easy to use. Also included on this disk is a program to list the files 
on an Apple ][ DOS diskette and many more graphic 
demonstrations. 

For only $9.95 (plus $1 .50 for postage and handling) you can get 
either of these great packages. If you want to order both you can 
get them for the extra low price of $1 5.00 (plus $2.00 for postase 
and handlins). Order today! 

Group rates are as follows: 

2-9 disks: $7.50 apiece + $2 total shippins 

10-24 disks: $7.00 apiece + $3 total shippins 

over 24 disks: $6.50 apiece + $4 total shippins 

Group rates must have one mailins address. Please use the 
attached envelope for orders. If the envelope is missins, send to: 
ON THREE 
Attn: ORDER DEPT. 
P.O. Box 3825 
Ventura, California 93006 



ON THREE O'Clock 

Callins all you time conscious Apple /// owners out there. How 
would you like a workins clock/calendar for your Apple///? Just 
as it was orisinally intended, this kit comes complete with a plus in 
clock chip with a battery backup. 

With ON THREE O'Clock installed, any timeyou save or modify a 
file, the current time and date will be stored on disk. Thus you will 
now be able to tell which file you last worked on. Your prosrams 
can now use the Apple /// built-in date and time routines to sive 
you an up to the second read-out of what time it is. 

Extremely easy to install and adjust, it is completely compatible 
with SOS and doesn't use up a slot! This is the one you have been 
waitins for! The packase contains comprehensive instructions and 
a Six Month Warranty! Try to set that deal anywhere else! 

What's the best part? - The price! While others are sellins theirs 
for $60 and up, we have broken the $50 barrier. Heck, we broke the 
$40 barrier! 

For only $39.95 (plus $2.50 for postase and handlins) you can 
Set the best little clock in town! 

Group rates dre as follows: 

2-9 clock sets: $36.50 apiece + $5 total shippins 
10-24 clock sets: $33.25 apiece + $7 total shippins 
over 24 clock sets: $31 .00 apiece + $9 total shippins 
Group rates must have one mailins address. Please use the 
attached envelope for orders. If the envelope is missins, send to: 

ON THREE 

Attn: ORDER DEPT. 

P.O. Box 3825 

Ventura, California 93006 

For prices that are out of this world... 
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